Midpoint on a great circle

Time bar (total: 20.7s)

start0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

analyze590.0ms (2.8%)

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

Compiled 22 to 16 computations (27.3% saved)

sample5.4s (26%)

Memory
-302.2MiB live, 6 305.1MiB allocated
Samples
3.9s4 341×1valid
1.0s3 909×0valid
2.0ms5×2valid
1.0ms1×3valid
Precisions
Click to see histograms. Total time spent on operations: 4.5s
ival-cos: 2.4s (54% of total)
adjust: 526.0ms (11.6% of total)
ival-sin: 495.0ms (11% of total)
ival-add: 420.0ms (9.3% of total)
ival-atan2: 334.0ms (7.4% of total)
ival-mult: 219.0ms (4.8% of total)
ival-sub: 71.0ms (1.6% of total)
ival-true: 7.0ms (0.2% of total)
ival-assert: 4.0ms (0.1% of total)
Bogosity

explain497.0ms (2.4%)

Memory
12.3MiB live, 632.5MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
71120(-6.159531595735202e+61 5.478782488096632e-307 1.1298915565520124e-181 1.3557570584359162e+190)0-(sin.f64 (-.f64 lambda1 lambda2))
70120(-6.159531595735202e+61 5.478782488096632e-307 1.1298915565520124e-181 1.3557570584359162e+190)0-(cos.f64 (-.f64 lambda1 lambda2))
51(-204.34473886226192 -3.3222744190401225e-60 2.9263048467087977e-83 4.064443115405935e-235)0-(+.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
sin.f64(sin.f64 (-.f64 lambda1 lambda2))sensitivity1910
cos.f64(cos.f64 (-.f64 lambda1 lambda2))sensitivity1900
+.f64(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))cancellation33
Confusion
Predicted +Predicted -
+70
-18465
Precision
0.03664921465968586
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+700
-184362
Precision?
0.03608247422680412
Recall?
1.0
Freqs
test
numberfreq
065
2189
32
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
270.0ms364×1valid
22.0ms148×0valid
Compiler

Compiled 190 to 46 computations (75.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 256.0ms
ival-cos: 139.0ms (54.2% of total)
ival-sin: 43.0ms (16.8% of total)
ival-mult: 25.0ms (9.7% of total)
adjust: 20.0ms (7.8% of total)
ival-atan2: 15.0ms (5.8% of total)
ival-add: 8.0ms (3.1% of total)
ival-sub: 5.0ms (1.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess159.0ms (0.8%)

Memory
32.4MiB live, 103.6MiB allocated
Algorithm
1×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
1×iter limit
1×saturated
1×iter limit
1×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 24 to 14 computations (41.7% saved)

eval0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated
Compiler

Compiled 4 to 4 computations (0% saved)

prune1.0ms (0%)

Memory
3.4MiB live, 3.4MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶98.2%
(+.f64 lambda1 (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 24 to 14 computations (41.7% saved)

simplify30.0ms (0.1%)

Memory
-8.7MiB live, 22.7MiB allocated
Algorithm
1×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
1×iter limit
1×saturated
1×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))

localize183.0ms (0.9%)

Memory
12.7MiB live, 316.4MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.19140625
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy0.5448539176392183
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy15.236328688547452
(sin.f64 (-.f64 lambda1 lambda2))
accuracy15.263402233165403
(cos.f64 (-.f64 lambda1 lambda2))
Samples
134.0ms182×1valid
13.0ms74×0valid
Compiler

Compiled 83 to 16 computations (80.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 124.0ms
ival-cos: 59.0ms (47.7% of total)
ival-sin: 26.0ms (21% of total)
adjust: 16.0ms (12.9% of total)
ival-mult: 8.0ms (6.5% of total)
ival-atan2: 7.0ms (5.7% of total)
ival-add: 4.0ms (3.2% of total)
ival-sub: 2.0ms (1.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series61.0ms (0.3%)

Memory
-14.4MiB live, 45.0MiB 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
39.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)))
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)))

simplify166.0ms (0.8%)

Memory
26.6MiB live, 286.9MiB allocated
Algorithm
1×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
1×iter limit
1×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 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (*.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 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (*.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 (neg.f64 (sin.f64 lambda2)) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) lambda1 #s(literal -1 binary64)) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64))) 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) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2))) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (cos 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (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 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))))))
(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 #s(literal -1/6 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64))) 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) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 lambda2)))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) lambda2 #s(literal -1 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)) lambda2)) 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 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) (*.f64 phi2 phi2))) (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 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (*.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)))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) (*.f64 phi2 phi2))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (*.f64 (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)))

rewrite181.0ms (0.9%)

Memory
5.1MiB live, 314.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
1×iter limit
1×node limit
1×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
(*.f64 (/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/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)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (/.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 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 (/.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 (pow.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)))) (fma.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))
(*.f64 (/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (/.f64 #s(literal 1 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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (+.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) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (neg.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(*.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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 #s(literal 1 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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(*.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) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(*.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))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.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))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1 binary64))
(/.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))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.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 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))
(/.f64 (*.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 #s(literal 1 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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/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 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 9 binary64))) (/.f64 #s(literal 1 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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.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))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64))))
(/.f64 (*.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (*.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))) #s(literal 1 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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (+.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (*.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.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))))) (neg.f64 (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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.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))) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (*.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))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (*.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))) #s(literal 1 binary64)) (*.f64 (-.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 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (-.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))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/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))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))) (*.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 (-.f64 (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(/.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 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))
(/.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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/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 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 9 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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.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))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.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)))) (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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/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 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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(neg.f64 (/.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)))) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(neg.f64 (/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(neg.f64 (/.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))) (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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(fma.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/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)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(fma.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(fma.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -1/2 binary64) (cos.f64 phi1))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 phi1))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda1 phi2) (+.f64 lambda2 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (cos.f64 phi1))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda1 phi2) (+.f64 lambda2 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (cos.f64 phi1))
(fma.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(+.f64 (+.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.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 (*.f64 (*.f64 lambda1 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 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 (fma.f64 (*.f64 lambda1 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 3 binary64))) (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (pow.f64 (*.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)))) #s(literal 2 binary64)))) (-.f64 (*.f64 lambda1 lambda1) (*.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 (/.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 lambda1 lambda1)) lambda1 (pow.f64 (*.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)))) #s(literal 3 binary64)))) (fma.f64 (*.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 (*.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 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))
(*.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 (*.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 (atan2.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 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (-.f64 (*.f64 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 (/.f64 #s(literal 1 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))) (fma.f64 (*.f64 lambda1 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 3 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 (neg.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 #s(literal 1 binary64) (neg.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)))))))
(*.f64 (neg.f64 (fma.f64 (*.f64 lambda1 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 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.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 (-.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 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(*.f64 (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 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (fma.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (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 (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 (+.f64 (atan2.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) (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 (fma.f64 (*.f64 lambda1 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 3 binary64))) (/.f64 #s(literal 1 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 (+.f64 (atan2.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)))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(*.f64 (+.f64 (atan2.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)))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(pow.f64 (/.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 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.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 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))) (fma.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 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 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 6 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))) (fma.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1) (+.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 2 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 4 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 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 6 binary64))) (/.f64 #s(literal 1 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 (*.f64 (*.f64 lambda1 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 3 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (*.f64 lambda1 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 9 binary64))) (/.f64 #s(literal 1 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)))) (fma.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 lambda1 lambda1)) lambda1 (-.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 6 binary64)) (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 3 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))) #s(literal 1 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (*.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))) #s(literal 1 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 (-.f64 (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))) (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))) (fma.f64 lambda1 (/.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (fma.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.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 (neg.f64 (neg.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))))) (neg.f64 (neg.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)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))))) (neg.f64 (neg.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 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.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 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.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 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 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 6 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1) (+.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 2 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 4 binary64)))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 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 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 lambda1 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 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 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (*.f64 lambda1 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 9 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 lambda1 lambda1)) lambda1 (-.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 6 binary64)) (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 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 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (*.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 (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 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.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 4 binary64))) (*.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)))) (fma.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 (-.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 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 6 binary64))) (*.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)))) (fma.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1) (+.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 2 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 4 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 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 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 (*.f64 (*.f64 lambda1 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 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 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 #s(literal -1 binary64) (neg.f64 (/.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 (-.f64 (atan2.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 (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 (/.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 #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 (fma.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (*.f64 lambda1 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 9 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)) (fma.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 lambda1 lambda1)) lambda1 (-.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 6 binary64)) (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 3 binary64))))))
(/.f64 (neg.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)))) (neg.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))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 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 3 binary64)))) (neg.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 (-.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 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 (fma.f64 (*.f64 lambda1 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 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)))
(neg.f64 (/.f64 (neg.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 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 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 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))))
(neg.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))) (neg.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)))))))
(neg.f64 (/.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))) (neg.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)))))
(fma.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (*.f64 lambda1 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 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)) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(fma.f64 (/.f64 (*.f64 lambda1 lambda1) (-.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 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(fma.f64 (*.f64 lambda1 lambda1) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(fma.f64 lambda1 (/.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 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 (*.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 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(+.f64 (atan2.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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.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 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(fma.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 (neg.f64 (neg.f64 lambda2))) (cos.f64 (neg.f64 lambda1))) (*.f64 (sin.f64 (neg.f64 (neg.f64 lambda2))) (sin.f64 (neg.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 (neg.f64 lambda1)) (cos.f64 (neg.f64 (neg.f64 lambda2)))) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 (neg.f64 (neg.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))))
(-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))))
(/.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))))
(neg.f64 (sin.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))))
(fma.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(-.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda2 lambda1))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))) (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))
(+.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))

eval368.0ms (1.8%)

Memory
-127.7MiB live, 229.3MiB allocated
Compiler

Compiled 17 327 to 1 353 computations (92.2% saved)

prune90.0ms (0.4%)

Memory
4.6MiB live, 205.5MiB allocated
Pruning

37 alts after pruning (37 fresh and 0 done)

PrunedKeptTotal
New42037457
Fresh000
Picked101
Done000
Total42137458
Accuracy
98.6%
Counts
458 → 37
Alt Table
Click to see full alt table
StatusAccuracyProgram
94.4%
(fma.f64 lambda1 (/.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
68.5%
(/.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))
98.0%
(/.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)))
80.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶94.4%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.1%
(+.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))))))
▶74.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶98.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
78.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶94.0%
(+.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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))))
93.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
94.0%
(+.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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
93.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/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))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))) (*.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.1%
(+.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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
93.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
98.2%
(+.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.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
98.2%
(+.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))))
98.2%
(+.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)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
97.5%
(+.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.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (/.f64 #s(literal 1 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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (+.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))))))
77.0%
(+.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.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 (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))))))
80.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.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 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
97.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
82.4%
(+.f64 lambda1 (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)))))
77.1%
(+.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) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.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))))))
75.5%
(+.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))))))
▶75.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
68.4%
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (-.f64 (*.f64 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))))
98.0%
(*.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)))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
Compiler

Compiled 3 108 to 1 628 computations (47.6% saved)

simplify161.0ms (0.8%)

Memory
15.6MiB live, 172.2MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff128
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))
cost-diff128
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))
cost-diff128
(neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
cost-diff192
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
cost-diff0
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.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))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff14208
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
cost-diff0
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
cost-diff0
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
Rules
10 334×lower-fma.f32
10 330×lower-fma.f64
3 604×lower-*.f32
3 580×lower-*.f64
1 744×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
065849
0121859
1191859
2346849
3756813
41793805
54176805
67206805
08335785
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
(+.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
lambda2
phi2
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(-.f64 (-.f64 lambda1 lambda2) phi2)
#s(literal 1/2 binary64)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.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))))))
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 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
lambda2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(cos.f64 phi2)
phi2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))))
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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(cos.f64 phi1)
phi1
(/.f64 (cos.f64 phi1) (-.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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))
(cos.f64 (+.f64 phi2 phi2))
(+.f64 phi2 phi2)
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
#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 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda2 phi2) lambda1)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda2 phi2) lambda1)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda2 phi2) lambda1))))
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda2 phi2) lambda1)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
(+.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
lambda2
phi2
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(-.f64 (-.f64 lambda1 lambda2) phi2)
#s(literal 1/2 binary64)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.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 (atan2.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 (*.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)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
lambda2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(cos.f64 phi2)
phi2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/4 binary64)) (*.f64 (/.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.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))) (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/4 binary64)) (*.f64 (/.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.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
(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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(fma.f64 (/.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/4 binary64)) (*.f64 (/.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (cos.f64 phi1)))
(cos.f64 phi1)
phi1
(/.f64 (cos.f64 phi1) (-.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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/4 binary64)))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 #s(literal -1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))) #s(literal -1/4 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))
(fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))
(*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 phi2 phi2))
(+.f64 phi2 phi2)
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(*.f64 #s(literal -2 binary64) (-.f64 lambda2 lambda1))
#s(literal 2 binary64)

localize867.0ms (4.2%)

Memory
-0.7MiB live, 570.0MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy3.182134465829181
(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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
accuracy15.236328688547452
(sin.f64 (-.f64 lambda1 lambda2))
accuracy15.263402233165403
(cos.f64 (-.f64 lambda2 lambda1))
accuracy15.287595821502004
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
accuracy3.1616877097817895
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
accuracy15.236328688547452
(sin.f64 (-.f64 lambda1 lambda2))
accuracy15.263402233165403
(cos.f64 (-.f64 lambda1 lambda2))
accuracy15.50158425923313
(sin.f64 (+.f64 lambda2 lambda1))
accuracy10.407987172917613
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
accuracy15.263402233165403
(cos.f64 (-.f64 lambda1 lambda2))
accuracy30.43244814504457
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
accuracy30.706344896283564
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
accuracy0.5448539176392183
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy15.236328688547452
(sin.f64 (-.f64 lambda1 lambda2))
accuracy15.263402233165403
(cos.f64 (-.f64 lambda1 lambda2))
accuracy32.82103623144109
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.16796875
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
accuracy0.19140625
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy0.5448539176392183
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy15.263402233165403
(cos.f64 (-.f64 lambda1 lambda2))
Samples
736.0ms241×1valid
26.0ms1×5exit
7.0ms14×0valid
Compiler

Compiled 843 to 64 computations (92.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 626.0ms
ival-cos: 219.0ms (35% of total)
ival-sin: 112.0ms (17.9% of total)
ival-mult: 95.0ms (15.2% of total)
ival-atan2: 88.0ms (14.1% of total)
adjust: 48.0ms (7.7% of total)
ival-add: 40.0ms (6.4% of total)
ival-sub: 12.0ms (1.9% of total)
ival-div: 8.0ms (1.3% of total)
ival-neg: 4.0ms (0.6% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series254.0ms (1.2%)

Memory
-2.7MiB live, 72.2MiB allocated
Counts
26 → 984
Calls
Call 1
Inputs
#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())
#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())
#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.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>) () ())
#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())
#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())
#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 phi1) (/.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())
Outputs
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))) (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))) (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))) (* 1/2 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (- (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* lambda1 (- (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (- (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* lambda1 (- (+ (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* lambda1 (- (* 2/3 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (- (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))) (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))))) (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (* 2/3 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))))) (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))))) (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* lambda1 (sin (* -2 lambda2)))) (* 1/2 (cos (* -2 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* -2 lambda2))) (* lambda1 (+ (* -1 (sin (* -2 lambda2))) (* -1 (* lambda1 (cos (* -2 lambda2)))))))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* -2 lambda2))) (* lambda1 (+ (* -1 (sin (* -2 lambda2))) (* lambda1 (+ (* -1 (cos (* -2 lambda2))) (* 2/3 (* lambda1 (sin (* -2 lambda2)))))))))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (sin (- phi2 lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- phi2 lambda2)) (* lambda1 (cos (- phi2 lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* -1/2 (* lambda1 (sin (- phi2 lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (- phi2 lambda2))) (* -1/6 (* lambda1 (cos (- phi2 lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 phi2))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (* lambda1 (cos (neg (+ lambda2 phi2))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* -1/2 (* lambda1 (sin (neg (+ lambda2 phi2)))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/6 (* lambda1 (cos (neg (+ lambda2 phi2)))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))) (taylor 0 lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (+ (* -1/2 (sin (- phi2 lambda2))) (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2))))))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (sin lambda2) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (cos lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 lambda2)) (* -2 (* lambda1 (sin (* -2 lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 lambda2)) (* lambda1 (- (* -2 (* lambda1 (cos (* -2 lambda2)))) (* 2 (sin (* -2 lambda2)))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 lambda2)) (* lambda1 (- (* lambda1 (+ (* -2 (cos (* -2 lambda2))) (* 4/3 (* lambda1 (sin (* -2 lambda2)))))) (* 2 (sin (* -2 lambda2)))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))) (+ (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda2) 2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))))) (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 3))) (+ (* 2/3 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (/ (* (cos phi2) (* (sin lambda2) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda2) 2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))))))) (+ (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda2) 2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))))) (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))) (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))) (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (- (+ (* lambda2 (- (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* lambda2 (- (* -2/3 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda2 (- (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda2 (- (+ (* lambda2 (- (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda2 (- (+ (* lambda2 (- (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* lambda2 (- (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (* -2/3 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 lambda1))) (* lambda2 (sin (* 2 lambda1))))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 lambda1))) (* lambda2 (+ (sin (* 2 lambda1)) (* -1 (* lambda2 (cos (* 2 lambda1)))))))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 lambda1))) (* lambda2 (+ (sin (* 2 lambda1)) (* lambda2 (+ (* -1 (cos (* 2 lambda1))) (* -2/3 (* lambda2 (sin (* 2 lambda1)))))))))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (sin (+ lambda1 phi2)) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (* -1 (* lambda2 (cos (+ lambda1 phi2))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1/2 (* lambda2 (sin (+ lambda1 phi2))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* 1/6 (* lambda2 (cos (+ lambda1 phi2))))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 phi2)) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 phi2)) (* -1 (* lambda2 (cos (- lambda1 phi2))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* -1/2 (* lambda2 (sin (- lambda1 phi2))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (- lambda1 phi2))) (* 1/6 (* lambda2 (cos (- lambda1 phi2))))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))))) (taylor 0 lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))))))) (taylor 0 lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (+ (* -1/2 (sin (- lambda1 phi2))) (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2))))))))))))) (taylor 0 lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* 2 lambda1)) (* 2 (* lambda2 (sin (* 2 lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* 2 lambda1)) (* lambda2 (- (* -2 (* lambda2 (cos (* 2 lambda1)))) (* -2 (sin (* 2 lambda1)))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* 2 lambda1)) (* lambda2 (- (* lambda2 (+ (* -2 (cos (* 2 lambda1))) (* -4/3 (* lambda2 (sin (* 2 lambda1)))))) (* -2 (sin (* 2 lambda1)))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)) (+ (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda1)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* lambda2 (- (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda1)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -2/3 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 3))) (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (+ (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda1)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ 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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1)))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* 1/2 (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/2 (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2))))))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* (pow phi2 2) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* (pow phi2 2) (- (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* (pow phi2 2) (- (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (* -2/45 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow phi2 2) (- (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow phi2 2) (- (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow phi2 2) (- (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (* -2/45 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))))) (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi2 2))) (taylor 0 phi2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* 1/3 (pow phi2 2)) 1))) (taylor 0 phi2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/3 (* -2/45 (pow phi2 2)))) 1))) (taylor 0 phi2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1/2 (* phi2 (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1 (* phi2 (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* -1/2 (* phi2 (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/6 (* phi2 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (* 2 (sin (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* -1 (* phi2 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1 (sin (- lambda1 lambda2))) (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2))))))))))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda2 lambda1)))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (- (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -2/45 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 3)))))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (taylor inf phi2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (taylor inf phi2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (taylor inf phi2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (taylor inf phi2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (taylor -inf phi2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (taylor -inf phi2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (taylor -inf phi2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (taylor -inf phi2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* (pow phi1 2) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))))) (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/720 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/48 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))))) (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))))) (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (* -1/2 (/ (* (pow phi1 2) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow phi1 2) (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow phi1 2) (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (+ (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (+ (* -1/720 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/48 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (+ (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (+ (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* (pow phi1 2) (- (+ (* -1/720 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/48 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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)))))) (patch (+.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)))))) #<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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (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 (*.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))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (patch (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (patch (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) #<representation binary64>) () ())) ())
Calls

12 calls:

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

simplify688.0ms (3.3%)

Memory
-9.0MiB live, 308.5MiB allocated
Algorithm
1×egg-herbie
Rules
8 278×lower-fma.f64
8 278×lower-fma.f32
6 486×lower-*.f64
6 486×lower-*.f32
6 460×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0120228025
1392627599
0848226186
Stop Event
1×iter limit
1×node limit
Counts
984 → 976
Calls
Call 1
Inputs
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))))
(+ (* 1/2 (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))) (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))) (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))))))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))) (* 1/2 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(* (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 (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (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/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))
(+ (* lambda1 (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(+ (* lambda1 (- (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* lambda1 (- (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(+ (* lambda1 (- (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* lambda1 (- (+ (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* lambda1 (- (* 2/3 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(- (* lambda1 (- (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(- (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))) (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))))) (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(- (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (* 2/3 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))))) (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))))) (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(+ 1/2 (* 1/2 (cos (* -2 lambda2))))
(+ 1/2 (+ (* -1 (* lambda1 (sin (* -2 lambda2)))) (* 1/2 (cos (* -2 lambda2)))))
(+ 1/2 (+ (* 1/2 (cos (* -2 lambda2))) (* lambda1 (+ (* -1 (sin (* -2 lambda2))) (* -1 (* lambda1 (cos (* -2 lambda2))))))))
(+ 1/2 (+ (* 1/2 (cos (* -2 lambda2))) (* lambda1 (+ (* -1 (sin (* -2 lambda2))) (* lambda1 (+ (* -1 (cos (* -2 lambda2))) (* 2/3 (* lambda1 (sin (* -2 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)))))))))
(sin (- phi2 lambda2))
(+ (sin (- phi2 lambda2)) (* lambda1 (cos (- phi2 lambda2))))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* -1/2 (* lambda1 (sin (- phi2 lambda2)))))))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (- phi2 lambda2))) (* -1/6 (* lambda1 (cos (- phi2 lambda2)))))))))
(sin (neg (+ lambda2 phi2)))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (cos (neg (+ lambda2 phi2)))))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* -1/2 (* lambda1 (sin (neg (+ lambda2 phi2))))))))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/6 (* lambda1 (cos (neg (+ lambda2 phi2))))))))))
(+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (+ (* -1/2 (sin (- phi2 lambda2))) (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))))))))))
(sin lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2))))))))
(cos (* -2 lambda2))
(+ (cos (* -2 lambda2)) (* -2 (* lambda1 (sin (* -2 lambda2)))))
(+ (cos (* -2 lambda2)) (* lambda1 (- (* -2 (* lambda1 (cos (* -2 lambda2)))) (* 2 (sin (* -2 lambda2))))))
(+ (cos (* -2 lambda2)) (* lambda1 (- (* lambda1 (+ (* -2 (cos (* -2 lambda2))) (* 4/3 (* lambda1 (sin (* -2 lambda2)))))) (* 2 (sin (* -2 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)))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(- (+ (* lambda1 (- (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))) (+ (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda2) 2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))))) (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 3))) (+ (* 2/3 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (/ (* (cos phi2) (* (sin lambda2) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda2) 2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))))))) (+ (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda2) 2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))))) (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (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
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* (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 (- 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)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (cos (* 2 (- 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))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 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))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(* (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 (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)))))))
(/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* 1/2 (cos (* -2 (+ 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))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (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 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))))
(+ (* 1/2 (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))) (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))) (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))))))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(* (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)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))
(+ (* lambda2 (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(+ (* lambda2 (- (+ (* lambda2 (- (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* lambda2 (- (* -2/3 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(- (* lambda2 (- (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(- (* lambda2 (- (+ (* lambda2 (- (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(- (* lambda2 (- (+ (* lambda2 (- (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* lambda2 (- (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (* -2/3 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(+ 1/2 (* 1/2 (cos (* 2 lambda1))))
(+ 1/2 (+ (* 1/2 (cos (* 2 lambda1))) (* lambda2 (sin (* 2 lambda1)))))
(+ 1/2 (+ (* 1/2 (cos (* 2 lambda1))) (* lambda2 (+ (sin (* 2 lambda1)) (* -1 (* lambda2 (cos (* 2 lambda1))))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 lambda1))) (* lambda2 (+ (sin (* 2 lambda1)) (* lambda2 (+ (* -1 (cos (* 2 lambda1))) (* -2/3 (* lambda2 (sin (* 2 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))))))))
(sin (+ lambda1 phi2))
(+ (sin (+ lambda1 phi2)) (* -1 (* lambda2 (cos (+ lambda1 phi2)))))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1/2 (* lambda2 (sin (+ lambda1 phi2)))))))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* 1/6 (* lambda2 (cos (+ lambda1 phi2)))))))))
(sin (- lambda1 phi2))
(+ (sin (- lambda1 phi2)) (* -1 (* lambda2 (cos (- lambda1 phi2)))))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* -1/2 (* lambda2 (sin (- lambda1 phi2)))))))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (- lambda1 phi2))) (* 1/6 (* lambda2 (cos (- lambda1 phi2)))))))))
(+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (+ (* -1/2 (sin (- lambda1 phi2))) (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))))))))))
(sin lambda1)
(+ (sin lambda1) (* lambda2 (cos lambda1)))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1))))))))
(cos (* 2 lambda1))
(+ (cos (* 2 lambda1)) (* 2 (* lambda2 (sin (* 2 lambda1)))))
(+ (cos (* 2 lambda1)) (* lambda2 (- (* -2 (* lambda2 (cos (* 2 lambda1)))) (* -2 (sin (* 2 lambda1))))))
(+ (cos (* 2 lambda1)) (* lambda2 (- (* lambda2 (+ (* -2 (cos (* 2 lambda1))) (* -4/3 (* lambda2 (sin (* 2 lambda1)))))) (* -2 (sin (* 2 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)))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(- (+ (* lambda2 (- (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)) (+ (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda1)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* lambda2 (- (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda1)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -2/3 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 3))) (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (+ (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda1)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (cos (* 2 (- 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))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(* (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 (+ 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))))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))
(+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))
(+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))
(+ 1/2 (* 1/2 (cos (* 2 (+ 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)))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* 1/2 (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/2 (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))
(+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* (pow phi2 2) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1)))))))
(+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* (pow phi2 2) (- (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1)))))))
(+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* (pow phi2 2) (- (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (* -2/45 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1)))))))
(* -1 (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(- (* (pow phi2 2) (- (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(- (* (pow phi2 2) (- (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(- (* (pow phi2 2) (- (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (* -2/45 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))))) (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
1
(+ 1 (* -1 (pow phi2 2)))
(+ 1 (* (pow phi2 2) (- (* 1/3 (pow phi2 2)) 1)))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/3 (* -2/45 (pow phi2 2)))) 1)))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* phi2 (cos (- lambda1 lambda2))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1 (* phi2 (cos (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(* 2 (sin (- lambda1 lambda2)))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* -1 (* phi2 (sin (- lambda1 lambda2))))))))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1 (sin (- lambda1 lambda2))) (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda2 lambda1)))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(- (+ (* (pow phi2 2) (- (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -2/45 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 3)))))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (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))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ 1/2 (* 1/2 (cos (* 2 phi2))))
(+ 1/2 (* 1/2 (cos (* 2 phi2))))
(+ 1/2 (* 1/2 (cos (* 2 phi2))))
(+ 1/2 (* 1/2 (cos (* 2 phi2))))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (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))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi2)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi2)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi2)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi2)))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (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))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ (* 1/2 (/ (* (pow phi1 2) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))))) (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/720 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/48 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))))) (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))))) (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (* -1/2 (/ (* (pow phi1 2) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (* (pow phi1 2) (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (* (pow phi1 2) (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (+ (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (+ (* -1/720 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/48 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (+ (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (+ (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* (pow phi1 2) (- (+ (* -1/720 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/48 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (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))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
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)))))
(+.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (*.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)))))
(+.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (sin.f64 lambda2) (cos.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1))
(+ (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)))))
(+.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.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 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1))
(+ (* -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 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.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 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1))
(+ (* 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 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))) (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 lambda2)) (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2))) (sin.f64 (+.f64 lambda2 phi2))))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))) (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2)))) lambda1 (+.f64 (cos.f64 (-.f64 phi2 lambda2)) (cos.f64 (+.f64 lambda2 phi2))))) lambda1 (*.f64 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))) (* 1/2 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/6 binary64) (+.f64 (cos.f64 (-.f64 phi2 lambda2)) (cos.f64 (+.f64 lambda2 phi2)))) lambda1 (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2)))))) lambda1 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 lambda2)) (cos.f64 (+.f64 lambda2 phi2))) #s(literal 1/2 binary64))) lambda1 (*.f64 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))) #s(literal 1/2 binary64)))
(* (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 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1))
(+ (* 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 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.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)))
(/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
(+ (* lambda1 (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(fma.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64)))) lambda1 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(+ (* lambda1 (- (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* lambda1 (- (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(fma.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64)))) (sin.f64 lambda2)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) lambda1 (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))))) lambda1 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(+ (* lambda1 (- (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* lambda1 (- (+ (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* lambda1 (- (* 2/3 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(fma.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (fma.f64 (-.f64 (*.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64)))) (sin.f64 lambda2)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 lambda2)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/6 binary64))))) lambda1 (neg.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64)))) (sin.f64 lambda2)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) lambda1 (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))))) lambda1 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
(- (* lambda1 (- (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) lambda1 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(- (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))) (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))))) (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64)))) (sin.f64 lambda2)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal -2 binary64) lambda2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))) lambda1 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))) lambda1 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(- (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (* 2/3 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))))) (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))))) (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64)))) (sin.f64 lambda2)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (+.f64 (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64)))) (sin.f64 lambda2)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 lambda2)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/6 binary64))) (*.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))) lambda1 (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal -2 binary64) lambda2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))) lambda1 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))) lambda1 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(+ 1/2 (* 1/2 (cos (* -2 lambda2))))
(fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* lambda1 (sin (* -2 lambda2)))) (* 1/2 (cos (* -2 lambda2)))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 lambda1) (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))))
(+ 1/2 (+ (* 1/2 (cos (* -2 lambda2))) (* lambda1 (+ (* -1 (sin (* -2 lambda2))) (* -1 (* lambda1 (cos (* -2 lambda2))))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) lambda1 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)))) lambda1))
(+ 1/2 (+ (* 1/2 (cos (* -2 lambda2))) (* lambda1 (+ (* -1 (sin (* -2 lambda2))) (* lambda1 (+ (* -1 (cos (* -2 lambda2))) (* 2/3 (* lambda1 (sin (* -2 lambda2))))))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2/3 binary64) lambda1) (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (neg.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)))) lambda1 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)))) lambda1))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (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))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) #s(literal -1/2 binary64)))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(sin (- phi2 lambda2))
(sin.f64 (-.f64 phi2 lambda2))
(+ (sin (- phi2 lambda2)) (* lambda1 (cos (- phi2 lambda2))))
(fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* -1/2 (* lambda1 (sin (- phi2 lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (-.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (- phi2 lambda2))) (* -1/6 (* lambda1 (cos (- phi2 lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 (-.f64 phi2 lambda2)) (*.f64 (sin.f64 (-.f64 phi2 lambda2)) #s(literal -1/2 binary64))) lambda1 (cos.f64 (-.f64 phi2 lambda2))) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(sin (neg (+ lambda2 phi2)))
(sin.f64 (-.f64 (neg.f64 lambda2) phi2))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (cos (neg (+ lambda2 phi2)))))
(fma.f64 (cos.f64 (+.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* -1/2 (* lambda1 (sin (neg (+ lambda2 phi2))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (-.f64 (neg.f64 lambda2) phi2)) (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/6 (* lambda1 (cos (neg (+ lambda2 phi2))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 (+.f64 lambda2 phi2)) (*.f64 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)) #s(literal -1/2 binary64))) lambda1 (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)))
(+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))
(-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2)))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))))
(-.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 lambda2)) (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2))) (sin.f64 (+.f64 lambda2 phi2)))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2)))) lambda1 (+.f64 (cos.f64 (-.f64 phi2 lambda2)) (cos.f64 (+.f64 lambda2 phi2)))) lambda1 (sin.f64 (-.f64 phi2 lambda2))) (sin.f64 (+.f64 lambda2 phi2)))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (+ (* -1/2 (sin (- phi2 lambda2))) (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))))))))))
(-.f64 (fma.f64 (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (+.f64 (cos.f64 (-.f64 phi2 lambda2)) (cos.f64 (+.f64 lambda2 phi2)))) lambda1 (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))))) lambda1 (cos.f64 (-.f64 phi2 lambda2))) (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2))) (sin.f64 (+.f64 lambda2 phi2)))
(sin lambda2)
(sin.f64 lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(fma.f64 (cos.f64 lambda2) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 (sin.f64 lambda2) #s(literal -1/2 binary64))) lambda1 (cos.f64 lambda2)) lambda1 (sin.f64 lambda2))
(cos (* -2 lambda2))
(cos.f64 (*.f64 #s(literal -2 binary64) lambda2))
(+ (cos (* -2 lambda2)) (* -2 (* lambda1 (sin (* -2 lambda2)))))
(fma.f64 (*.f64 #s(literal -2 binary64) lambda1) (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)))
(+ (cos (* -2 lambda2)) (* lambda1 (- (* -2 (* lambda1 (cos (* -2 lambda2)))) (* 2 (sin (* -2 lambda2))))))
(fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) lambda1 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)))) lambda1 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)))
(+ (cos (* -2 lambda2)) (* lambda1 (- (* lambda1 (+ (* -2 (cos (* -2 lambda2))) (* 4/3 (* lambda1 (sin (* -2 lambda2)))))) (* 2 (sin (* -2 lambda2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 4/3 binary64) lambda1) (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal -2 binary64))) lambda1 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal -2 binary64))) lambda1 (cos.f64 (*.f64 #s(literal -2 binary64) 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))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(- (+ (* lambda1 (- (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))))) lambda1 (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))) (+ (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda2) 2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))))) (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64)))) (sin.f64 lambda2)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (neg.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 3 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 lambda2)) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) lambda1 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))))) lambda1 (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 3))) (+ (* 2/3 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (/ (* (cos phi2) (* (sin lambda2) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda2) 2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))))))) (+ (* -1 (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda2) 2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))))) (+ (* -1 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda2))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64)))) (sin.f64 lambda2)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (-.f64 (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64)))) (sin.f64 lambda2)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 lambda2)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/6 binary64))) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/6 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 lambda2)) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 3 binary64))) #s(literal 1/2 binary64) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 3 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 lambda2)) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))))) lambda1 (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (fma.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (fma.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 3 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 lambda2)) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) lambda1 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))))) lambda1 (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 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 (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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 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 (- 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)))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(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))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(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))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.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 (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)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 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 (/.f64 (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)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 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 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* (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 (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))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 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)))
(/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(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))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64)))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64)))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64)))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64)))
(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))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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))))
(+.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (*.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))))
(+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (*.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 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 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 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))) (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (fma.f64 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2))) lambda2 (sin.f64 (-.f64 lambda1 phi2))) (sin.f64 (+.f64 lambda1 phi2))))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))) (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2)))) lambda2 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2))))) lambda2 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (cos.f64 (-.f64 lambda1 phi2)) (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (*.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2)))))) lambda2 (*.f64 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64))) lambda2 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) #s(literal 1/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 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 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/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
(+ (* lambda2 (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(fma.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) lambda2 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
(+ (* lambda2 (- (+ (* lambda2 (- (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(fma.f64 (fma.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) lambda2 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) lambda2 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
(+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* lambda2 (- (* -2/3 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(fma.f64 (fma.f64 (fma.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 (-.f64 (fma.f64 #s(literal -2/3 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) lambda2 (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) lambda2 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) lambda2 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
(- (* lambda2 (- (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(fma.f64 (fma.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) lambda2 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
(- (* lambda2 (- (+ (* lambda2 (- (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (neg.f64 (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) lambda2 (fma.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) lambda2 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
(- (* lambda2 (- (+ (* lambda2 (- (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* lambda2 (- (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (* -2/3 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(fma.f64 (fma.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (fma.f64 (-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1/6 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (*.f64 #s(literal -2/3 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) lambda2 (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) lambda2 (fma.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) lambda2 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
(+ 1/2 (* 1/2 (cos (* 2 lambda1))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (+ (* 1/2 (cos (* 2 lambda1))) (* lambda2 (sin (* 2 lambda1)))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) lambda2))
(+ 1/2 (+ (* 1/2 (cos (* 2 lambda1))) (* lambda2 (+ (sin (* 2 lambda1)) (* -1 (* lambda2 (cos (* 2 lambda1))))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (neg.f64 lambda2) (sin.f64 (*.f64 #s(literal 2 binary64) lambda1))) lambda2))
(+ 1/2 (+ (* 1/2 (cos (* 2 lambda1))) (* lambda2 (+ (sin (* 2 lambda1)) (* lambda2 (+ (* -1 (cos (* 2 lambda1))) (* -2/3 (* lambda2 (sin (* 2 lambda1))))))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2/3 binary64) lambda2) (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (neg.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) lambda2 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1))) lambda2))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(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))
(sin (+ lambda1 phi2))
(sin.f64 (+.f64 lambda1 phi2))
(+ (sin (+ lambda1 phi2)) (* -1 (* lambda2 (cos (+ lambda1 phi2)))))
(fma.f64 (cos.f64 (+.f64 lambda1 phi2)) (neg.f64 lambda2) (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1/2 (* lambda2 (sin (+ lambda1 phi2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (+.f64 lambda1 phi2)) (neg.f64 (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* 1/6 (* lambda2 (cos (+ lambda1 phi2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (cos.f64 (+.f64 lambda1 phi2)) (*.f64 (sin.f64 (+.f64 lambda1 phi2)) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (sin.f64 (+.f64 lambda1 phi2)))
(sin (- lambda1 phi2))
(sin.f64 (-.f64 lambda1 phi2))
(+ (sin (- lambda1 phi2)) (* -1 (* lambda2 (cos (- lambda1 phi2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 phi2)) (neg.f64 lambda2) (sin.f64 (-.f64 lambda1 phi2)))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* -1/2 (* lambda2 (sin (- lambda1 phi2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (-.f64 lambda1 phi2)) (neg.f64 (cos.f64 (-.f64 lambda1 phi2)))) lambda2 (sin.f64 (-.f64 lambda1 phi2)))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (- lambda1 phi2))) (* 1/6 (* lambda2 (cos (- lambda1 phi2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (cos.f64 (-.f64 lambda1 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 phi2)) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 (-.f64 lambda1 phi2)))) lambda2 (sin.f64 (-.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))
(+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))))
(+.f64 (fma.f64 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2))) lambda2 (sin.f64 (-.f64 lambda1 phi2))) (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2)))) lambda2 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (sin.f64 (-.f64 lambda1 phi2))) (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (+ (* -1/2 (sin (- lambda1 phi2))) (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))))))))))
(+.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (cos.f64 (-.f64 lambda1 phi2)) (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (*.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))))) lambda2 (neg.f64 (cos.f64 (-.f64 lambda1 phi2)))) (cos.f64 (+.f64 lambda1 phi2))) lambda2 (sin.f64 (-.f64 lambda1 phi2))) (sin.f64 (+.f64 lambda1 phi2)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* lambda2 (cos lambda1)))
(fma.f64 (cos.f64 lambda1) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(cos (* 2 lambda1))
(cos.f64 (*.f64 #s(literal 2 binary64) lambda1))
(+ (cos (* 2 lambda1)) (* 2 (* lambda2 (sin (* 2 lambda1)))))
(fma.f64 (*.f64 #s(literal 2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))
(+ (cos (* 2 lambda1)) (* lambda2 (- (* -2 (* lambda2 (cos (* 2 lambda1)))) (* -2 (sin (* 2 lambda1))))))
(fma.f64 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) lambda2) (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)))) lambda2 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))
(+ (cos (* 2 lambda1)) (* lambda2 (- (* lambda2 (+ (* -2 (cos (* 2 lambda1))) (* -4/3 (* lambda2 (sin (* 2 lambda1)))))) (* -2 (sin (* 2 lambda1))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -4/3 binary64) lambda2) (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal -2 binary64))) lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 2 binary64))) lambda2 (cos.f64 (*.f64 #s(literal 2 binary64) 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))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
(- (+ (* lambda2 (- (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)) (+ (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(fma.f64 (-.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) lambda2 (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
(- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda1)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (neg.f64 (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (neg.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (neg.f64 (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) lambda2 (-.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) lambda2 (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
(- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* lambda2 (- (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda1)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -2/3 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 3))) (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (+ (* -1 (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda1)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda1)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (-.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1/6 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (neg.f64 (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal -2/3 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal -1/6 binary64)))))) lambda2 (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (neg.f64 (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) lambda2 (-.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) lambda2 (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (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 (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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(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))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(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))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.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 (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 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* (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 (+ 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)))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(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))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(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))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(+ (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 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #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))))))))
(+.f64 (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) (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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (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 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 #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)))) (*.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 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.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 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 lambda1) (cos.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 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* 1/2 (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/2 (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(fma.f64 (fma.f64 (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 0 binary64) phi2) #s(literal 1/2 binary64))) phi2 #s(literal 0 binary64)) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (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/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))
(/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* (pow phi2 2) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1)))))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (fma.f64 (-.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 phi2 phi2) (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* (pow phi2 2) (- (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1)))))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64))) (*.f64 phi2 phi2) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 phi2 phi2) (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* (pow phi2 2) (- (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (* -2/45 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1)))))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (fma.f64 (-.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (-.f64 (fma.f64 #s(literal -2/45 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (*.f64 phi2 phi2) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64) (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (*.f64 phi2 phi2) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 phi2 phi2) (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(* -1 (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (* (pow phi2 2) (- (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(-.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 phi2 phi2)) (fma.f64 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (* (pow phi2 2) (- (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64) (*.f64 #s(literal -1/3 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 phi2 phi2) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(- (* (pow phi2 2) (- (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (* -2/45 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))))) (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (fma.f64 (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal -1/24 binary64) (-.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (*.f64 #s(literal -2/45 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/3 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 phi2 phi2) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow phi2 2)))
(-.f64 #s(literal 1 binary64) (*.f64 phi2 phi2))
(+ 1 (* (pow phi2 2) (- (* 1/3 (pow phi2 2)) 1)))
(fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 phi2 phi2) #s(literal -1 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/3 (* -2/45 (pow phi2 2)))) 1)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 phi2 phi2) #s(literal 1/3 binary64)) (*.f64 phi2 phi2) #s(literal -1 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* phi2 (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) phi2 (cos.f64 (-.f64 lambda1 lambda2))) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1 (* phi2 (cos (- lambda1 lambda2)))))
(fma.f64 (neg.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi2) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) phi2 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(* 2 (sin (- lambda1 lambda2)))
(*.f64 #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))
(fma.f64 #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 0 binary64) phi2))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* -1 (* phi2 (sin (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) phi2 (*.f64 #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1 (sin (- lambda1 lambda2))) (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 0 binary64) phi2) (sin.f64 (-.f64 lambda1 lambda2))) phi2) phi2 (*.f64 #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda2 lambda1)))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ (* (pow phi2 2) (- (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 phi2 phi2) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (/.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 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal -1/24 binary64) (*.f64 #s(literal 1/3 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 phi2 phi2) (neg.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 phi2 phi2) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (+ (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (- (cos phi1) (cos (- lambda2 lambda1))))))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -2/45 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 3)))))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda2 lambda1))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (fma.f64 (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal -1/24 binary64) (-.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (fma.f64 (/.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 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal -1/24 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal -1/2 binary64) (fma.f64 #s(literal -2/45 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/48 binary64) (/.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 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/720 binary64))))))) (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))) (fma.f64 (/.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 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal -1/24 binary64) (*.f64 #s(literal 1/3 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 phi2 phi2) (neg.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 phi2 phi2) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(+ 1/2 (* 1/2 (cos (* 2 phi2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.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 (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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))) #s(literal 1/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))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (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/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi2)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi2)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi2)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi2)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2))))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2))))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2))))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 phi2))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(+ 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)))))
(+.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi1 phi1) (*.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))))
(+.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) (*.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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(+ (* 1/2 (/ (* (pow phi1 2) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 phi1 phi1) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))))) (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(fma.f64 (neg.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1/24 binary64) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1/4 binary64))) (*.f64 phi1 phi1) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1/2 binary64)))) (*.f64 phi1 phi1) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/720 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/48 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))))) (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))))) (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(fma.f64 (fma.f64 (neg.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1/720 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1/24 binary64) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal 1/48 binary64)))) (*.f64 phi1 phi1) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1/24 binary64) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1/4 binary64))))) (*.f64 phi1 phi1) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 phi1 phi1) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(- (* -1/2 (/ (* (pow phi1 2) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 phi1 phi1) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal -1/2 binary64) (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (* (pow phi1 2) (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1/24 binary64) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1/4 binary64))) (*.f64 phi1 phi1) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (* (pow phi1 2) (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (+ (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (+ (* -1/720 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/48 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1/720 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1/24 binary64) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal 1/48 binary64)))) (*.f64 phi1 phi1) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1/24 binary64)))) (*.f64 phi1 phi1) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) (*.f64 phi1 phi1) (-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (+ (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(fma.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1/4 binary64) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1/24 binary64) (/.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal -1/2 binary64) (/.f64 #s(literal 1/24 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 phi1 phi1) (/.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (*.f64 phi1 phi1) (-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (+ (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* (pow phi1 2) (- (+ (* -1/720 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (+ (* 1/48 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 3))) (* 1/24 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(fma.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1/4 binary64) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1/24 binary64) (fma.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1/720 binary64) (+.f64 (/.f64 #s(literal 1/720 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) (fma.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1/24 binary64) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal 1/48 binary64))))) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal -1/2 binary64) (/.f64 #s(literal 1/24 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal 1/24 binary64) (/.f64 #s(literal 2/45 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))) (*.f64 phi1 phi1) (/.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal -1/2 binary64) (/.f64 #s(literal 1/24 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 phi1 phi1) (/.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (*.f64 phi1 phi1) (-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.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 (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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.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 (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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(* -1 (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))

rewrite338.0ms (1.6%)

Memory
8.1MiB live, 323.7MiB allocated
Rules
3 616×lower-*.f32
3 594×lower-*.f64
3 580×lower-/.f32
3 574×lower-/.f64
2 788×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
062453
0115416
1418367
23489367
08367357
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
26 → 678
Calls
Call 1
Inputs
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(+.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))))))
(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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))
(cos.f64 (-.f64 lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(sin.f64 (+.f64 lambda2 lambda1))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
Outputs
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/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 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (/.f64 #s(literal 1 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (neg.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))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (neg.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.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))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)) (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (cos.f64 phi1))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (cos.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (cos.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(/.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)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.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)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.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))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.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 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.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) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)))))
(/.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 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64))))
(fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.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)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))
(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))
(fma.f64 (/.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (cos.f64 phi1) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(fma.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 0 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (/.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.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 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(*.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))) (/.f64 #s(literal 1 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))))
(pow.f64 (/.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)))) (-.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (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)) (fma.f64 (*.f64 lambda1 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 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.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 (neg.f64 (neg.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))))) (neg.f64 (neg.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)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))))) (neg.f64 (neg.f64 (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 (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 (neg.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)))) (neg.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))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 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 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.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 (neg.f64 (fma.f64 (*.f64 lambda1 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 3 binary64)))) (neg.f64 (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 (*.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 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 #s(literal -1 binary64) (neg.f64 (/.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)))) (-.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 #s(literal -1 binary64) (neg.f64 (/.f64 (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)) (fma.f64 (*.f64 lambda1 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 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.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)))) (-.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 #s(literal 1 binary64) (/.f64 (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)) (fma.f64 (*.f64 lambda1 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 3 binary64)))))
(/.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))) (+.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 (*.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 (fma.f64 (*.f64 lambda1 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 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 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (atan2.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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2))) (neg.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))) (neg.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(*.f64 (-.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 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 (fma.f64 (*.f64 lambda1 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 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.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))) (-.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) (*.f64 lambda1 lambda1))))
(pow.f64 (/.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.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))) (-.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) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 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 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (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 lambda1 lambda1))) (neg.f64 (-.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)))
(/.f64 (neg.f64 (neg.f64 (-.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))))) (neg.f64 (neg.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 (neg.f64 (neg.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))))) (neg.f64 (neg.f64 (fma.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))) (-.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) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (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 lambda1 lambda1)) (-.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))
(/.f64 (neg.f64 (-.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)))) (neg.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 (neg.f64 (fma.f64 (*.f64 lambda1 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 3 binary64)))) (neg.f64 (+.f64 (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 (*.f64 lambda1 lambda1) (*.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)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 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 3 binary64)))) (neg.f64 (fma.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))) (-.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) (*.f64 lambda1 lambda1))))
(/.f64 (-.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 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 #s(literal -1 binary64) (neg.f64 (/.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) (neg.f64 (/.f64 (fma.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))) (-.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) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 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 3 binary64))))))
(/.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 (fma.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))) (-.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) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 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 3 binary64)))))
(/.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))) (+.f64 (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 (*.f64 lambda1 lambda1) (*.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))))
(/.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))) (fma.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))) (-.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) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.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 (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 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 (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)
(+.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))))
(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)))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) 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 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))
(*.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)))))) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)))))))) (neg.f64 (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))))))
(/.f64 (*.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)))))) #s(literal 1/2 binary64)) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))))) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)))) (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))))
(fma.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))
(fma.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (cos.f64 phi2) (/.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1))))
(*.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)))))
(pow.f64 (/.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (neg.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (cos.f64 phi2))) (neg.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))))) (neg.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (cos.f64 phi2)) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda2 lambda1))))
(neg.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (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 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 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 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 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 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 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 lambda1)) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 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 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 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 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (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) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 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 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (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 (fma.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 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 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/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)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(pow.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (neg.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))))) (neg.f64 (*.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)))) (neg.f64 (*.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))))) (neg.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)))) (neg.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))))) (neg.f64 (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)))) (neg.f64 (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) #s(literal 1 binary64))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)))) (*.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (*.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)))) (*.f64 (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (*.f64 (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(+.f64 (*.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (*.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(+.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64))
(*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))) (neg.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(neg.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 #s(literal 0 binary64) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
(*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (cos.f64 phi2) (cos.f64 phi2))
(pow.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (cos.f64 phi2) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)) #s(literal 1/4 binary64))) (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))))) (neg.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2)))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi2)) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))
(pow.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64)) #s(literal 1/4 binary64))) (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64))))) (neg.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.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)))) (neg.f64 (+.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 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))))))
(pow.f64 (/.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))) (neg.f64 (neg.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))))))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (sin.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))))))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (sin.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))))
(fma.f64 (*.f64 (sin.f64 lambda2) #s(literal -1 binary64)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 #s(literal -1 binary64) (*.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 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (sin.f64 (+.f64 phi2 lambda1)) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 phi2 lambda1)) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) phi2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (neg.f64 (-.f64 lambda2 phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 (-.f64 lambda2 phi2)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
(-.f64 (*.f64 (sin.f64 (+.f64 phi2 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 (+.f64 phi2 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)))) (*.f64 (cos.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 (-.f64 lambda1 lambda2) phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 phi2))))
(+.f64 (*.f64 (sin.f64 (+.f64 phi2 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 (+.f64 phi2 lambda1)) (neg.f64 (sin.f64 lambda2))))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) phi2))))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (neg.f64 (-.f64 lambda2 phi2)))) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 (-.f64 lambda2 phi2)))))
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (-.f64 (neg.f64 lambda2) phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 (neg.f64 lambda2) phi2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) (neg.f64 phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (neg.f64 phi2)))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (neg.f64 (+.f64 lambda2 phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 (+.f64 lambda2 phi2)))))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (sin.f64 phi2))))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 (-.f64 lambda1 lambda2) phi2)))) (*.f64 (cos.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (-.f64 lambda1 lambda2) phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 (-.f64 lambda1 lambda2) phi2)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 lambda1 lambda2)) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2) (*.f64 phi2 (+.f64 (-.f64 lambda1 lambda2) phi2))))) (cos.f64 (/.f64 (*.f64 (*.f64 phi2 phi2) phi2) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2) (*.f64 phi2 (+.f64 (-.f64 lambda1 lambda2) phi2)))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 lambda1 lambda2)) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2) (*.f64 phi2 (+.f64 (-.f64 lambda1 lambda2) phi2))))) (sin.f64 (/.f64 (*.f64 (*.f64 phi2 phi2) phi2) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2) (*.f64 phi2 (+.f64 (-.f64 lambda1 lambda2) phi2)))))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (neg.f64 phi2)))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 (neg.f64 phi2)))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (+.f64 lambda2 phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (+.f64 lambda2 phi2))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 (neg.f64 lambda2) phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 (neg.f64 lambda2) phi2))))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) (neg.f64 phi2)))) (*.f64 (cos.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (neg.f64 phi2)))))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (neg.f64 (+.f64 lambda2 phi2)))) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 (+.f64 lambda2 phi2)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (sin.f64 phi2))))
(*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64))))
(*.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))))))
(*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))
(pow.f64 (/.f64 (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))) (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))))) (neg.f64 (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)))))))) (neg.f64 (neg.f64 (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))))))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))
(/.f64 (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))))) (neg.f64 (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))))))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)))))) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))) (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))) (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))) (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (fma.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(-.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))
(+.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (sin.f64 (-.f64 lambda2 lambda1))))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (-.f64 lambda2 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 4 binary64)) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 6 binary64)) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 4 binary64)) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 6 binary64)) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(fma.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda2) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 lambda2)))) (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 2 binary64) (neg.f64 lambda2)))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.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)))) (neg.f64 (+.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 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/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 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (/.f64 #s(literal 1 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (neg.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))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) (neg.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.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))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)) (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (cos.f64 phi1))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (cos.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (cos.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(/.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)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.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)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.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))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.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 (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.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) (/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)))))
(/.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 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64))))
(fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.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)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))
(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))
(fma.f64 (/.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (cos.f64 phi1) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(fma.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 0 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 2 binary64)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (/.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))

eval475.0ms (2.3%)

Memory
7.5MiB live, 1 111.0MiB allocated
Compiler

Compiled 122 702 to 6 255 computations (94.9% saved)

prune320.0ms (1.5%)

Memory
17.1MiB live, 779.9MiB allocated
Pruning

58 alts after pruning (58 fresh and 0 done)

PrunedKeptTotal
New2 330432 373
Fresh171532
Picked505
Done000
Total2 352582 410
Accuracy
100.0%
Counts
2 410 → 58
Alt Table
Click to see full alt table
StatusAccuracyProgram
94.4%
(fma.f64 lambda1 (/.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
68.5%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 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 lambda1)) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
48.1%
(/.f64 (-.f64 (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 lambda1 lambda1)) (-.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))
94.4%
(+.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
78.3%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (cos.f64 phi2)) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
90.2%
(+.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 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
78.2%
(+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
93.7%
(+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
93.7%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (sin (+ lambda2 lambda1)) (fma.f64 (cos.f64 lambda2) lambda1 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
68.6%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (sin (+ lambda2 lambda1)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.4%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.1%
(+.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))))))
94.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
65.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
72.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
▶73.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶99.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) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
98.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)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
97.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)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
80.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
77.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
72.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 #s(approx (* (+ 1/2 (* 1/2 (cos (+ phi2 phi2)))) (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))
94.0%
(+.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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
93.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
93.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.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))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))))
▶93.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
98.2%
(+.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.2%
(+.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))))
98.2%
(+.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.5%
(+.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))))))
77.0%
(+.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)))))
80.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.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 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
97.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
▶82.4%
(+.f64 lambda1 (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)))))
77.1%
(+.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 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
70.4%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
75.5%
(+.f64 lambda1 (atan2.f64 #s(approx (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
67.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
75.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 3 binary64)) (pow.f64 (cos.f64 phi1) #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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
75.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
75.6%
(+.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)))))))
75.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 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (/.f64 #s(literal 1 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
73.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
66.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
75.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
68.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)))))
65.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)))) (+.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 1 binary64)))))
▶75.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
66.8%
(+.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) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
75.5%
(+.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) lambda1) (neg.f64 (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))))))
75.5%
(+.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))))))
60.9%
(+.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.3%
(+.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))))))
98.0%
(*.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)))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
98.1%
#s(approx (+ lambda1 (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
Compiler

Compiled 4 256 to 2 286 computations (46.3% saved)

simplify146.0ms (0.7%)

Memory
-0.9MiB live, 234.9MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff128
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
cost-diff128
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
cost-diff192
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
cost-diff704
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
cost-diff0
(*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
cost-diff0
(atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
(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
(sin.f64 (-.f64 lambda1 lambda2))
cost-diff0
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
Rules
13 796×lower-fma.f32
13 784×lower-fma.f64
3 722×lower--.f32
3 710×lower--.f64
3 114×lower-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
079904
0147904
1240904
2473893
31286893
44200893
08109869
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
#s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))
(fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(cos.f64 (-.f64 phi2 lambda2))
(-.f64 phi2 lambda2)
phi2
lambda2
(sin.f64 (-.f64 phi2 lambda2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(-.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
#s(literal 1/2 binary64)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/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 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
#s(literal 1 binary64)
(/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
#s(literal 2 binary64)
(fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (+.f64 phi2 phi2))
(+.f64 phi2 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)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(sin.f64 lambda1)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 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 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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))
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))))
(+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))
#s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))
#s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))
(fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(cos.f64 (-.f64 phi2 lambda2))
(cos.f64 (-.f64 lambda2 phi2))
(-.f64 phi2 lambda2)
phi2
lambda2
(sin.f64 (-.f64 phi2 lambda2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(-.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
#s(literal 1/2 binary64)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (fma.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/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 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (fma.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/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 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (fma.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
#s(literal 1 binary64)
(/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (fma.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))
(*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 #s(literal -1/4 binary64) (cos.f64 (+.f64 phi2 phi2)) #s(literal -1/4 binary64)) (-.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
#s(literal 2 binary64)
(fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (+.f64 phi2 phi2))
(+.f64 phi2 phi2)

localize670.0ms (3.2%)

Memory
3.0MiB live, 1 069.1MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy2.9276521186164848
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
accuracy15.236328688547452
(sin.f64 (-.f64 lambda1 lambda2))
accuracy15.263402233165403
(cos.f64 (-.f64 lambda2 lambda1))
accuracy15.287595821502004
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
accuracy15.464821595173268
(cos.f64 (-.f64 phi2 lambda2))
accuracy15.506731015698202
(sin.f64 (-.f64 phi2 lambda2))
accuracy30.43244814504457
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
accuracy33.89179801693575
#s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))
accuracy0.19140625
(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.4265052732465175
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
accuracy15.236328688547452
(sin.f64 (-.f64 lambda1 lambda2))
accuracy24.82652194014015
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
accuracy15.236328688547452
(sin.f64 (-.f64 lambda1 lambda2))
accuracy15.263402233165403
(cos.f64 (-.f64 lambda1 lambda2))
accuracy30.29791918749511
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
accuracy32.82103623144109
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.140625
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
accuracy0.16796875
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
accuracy0.19140625
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 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.5448539176392183
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
Samples
569.0ms242×1valid
7.0ms13×0valid
6.0ms1×5exit
Compiler

Compiled 813 to 73 computations (91% saved)

Precisions
Click to see histograms. Total time spent on operations: 515.0ms
ival-cos: 196.0ms (38.1% of total)
ival-sin: 96.0ms (18.7% of total)
ival-mult: 69.0ms (13.4% of total)
adjust: 54.0ms (10.5% of total)
ival-add: 40.0ms (7.8% of total)
ival-atan2: 32.0ms (6.2% of total)
ival-sub: 19.0ms (3.7% of total)
ival-div: 5.0ms (1% 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)

series160.0ms (0.8%)

Memory
7.3MiB live, 180.9MiB allocated
Counts
31 → 1 152
Calls
Call 1
Inputs
#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 #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 (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))) (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))) (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))) (* 1/2 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* lambda1 (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* lambda1 (- (+ (* lambda1 (- (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* lambda1 (- (+ (* lambda1 (- (+ (* lambda1 (- (* -2/3 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))))) (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* lambda1 (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* -1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* lambda1 (+ (* -1 (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* 2/3 (* lambda1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda1 (- (* lambda1 (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* -1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda1 (- (* lambda1 (- (* -2/3 (* lambda1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* -1 (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (cos lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 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 (sin (- phi2 lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- phi2 lambda2)) (* lambda1 (cos (- phi2 lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* -1/2 (* lambda1 (sin (- phi2 lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (- phi2 lambda2))) (* -1/6 (* lambda1 (cos (- phi2 lambda2))))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 phi2))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (* lambda1 (cos (neg (+ lambda2 phi2))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* -1/2 (* lambda1 (sin (neg (+ lambda2 phi2)))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/6 (* lambda1 (cos (neg (+ lambda2 phi2)))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 lambda2)) (* -2 (* lambda1 (sin (* -2 lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 lambda2)) (* lambda1 (- (* -2 (* lambda1 (cos (* -2 lambda2)))) (* 2 (sin (* -2 lambda2)))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 lambda2)) (* lambda1 (- (* lambda1 (+ (* -2 (cos (* -2 lambda2))) (* 4/3 (* lambda1 (sin (* -2 lambda2)))))) (* 2 (sin (* -2 lambda2)))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 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))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor inf lambda1) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor inf lambda1) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor inf lambda1) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor inf lambda1) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 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 (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 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))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 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 (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))) (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))) (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* lambda2 (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* lambda2 (- (+ (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* lambda2 (- (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* lambda2 (- (+ (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* lambda2 (- (+ (* lambda2 (- (* 2/3 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* lambda2 (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1 (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* -2/3 (* lambda2 (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))))) (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* -1 (* lambda2 (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* 1/2 (cos (* 2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda2 (- (* lambda2 (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda2 (- (* lambda2 (- (* 2/3 (* lambda2 (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* -1 (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 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 phi2)) (taylor 0 lambda2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (* -1 (* lambda2 (cos (+ lambda1 phi2))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1/2 (* lambda2 (sin (+ lambda1 phi2))))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* 1/6 (* lambda2 (cos (+ lambda1 phi2))))))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 phi2)) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 phi2)) (* -1 (* lambda2 (cos (- lambda1 phi2))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* -1/2 (* lambda2 (sin (- lambda1 phi2))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (- lambda1 phi2))) (* 1/6 (* lambda2 (cos (- lambda1 phi2))))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin phi2) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* -1 (* lambda2 (cos phi2)))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* lambda2 (+ (* -1 (cos phi2)) (* -1/2 (* lambda2 (sin phi2)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* lambda2 (+ (* -1 (cos phi2)) (* lambda2 (+ (* -1/2 (sin phi2)) (* 1/6 (* lambda2 (cos phi2)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* lambda2 (sin phi2))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* lambda2 (- (* -1/2 (* lambda2 (cos phi2))) (* -1 (sin phi2))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos phi2)) (* -1/6 (* lambda2 (sin phi2))))) (* -1 (sin phi2))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* 2 lambda1)) (* 2 (* lambda2 (sin (* 2 lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* 2 lambda1)) (* lambda2 (- (* -2 (* lambda2 (cos (* 2 lambda1)))) (* -2 (sin (* 2 lambda1)))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* 2 lambda1)) (* lambda2 (- (* lambda2 (+ (* -2 (cos (* 2 lambda1))) (* -4/3 (* lambda2 (sin (* 2 lambda1)))))) (* -2 (sin (* 2 lambda1)))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 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 phi2) lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 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 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi2 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi2 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi2 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi2 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi2 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi2 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi2 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi2 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (-.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 (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* 1/2 (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/2 (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2))))))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1)))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (* -1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* -1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (* 2/45 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (* 1/3 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))))))) (taylor 0 phi2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* 1/3 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))))))) (taylor 0 phi2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* (pow phi2 2) (- (* -1/3 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* -1 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))))) (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* (pow phi2 2) (- (* (pow phi2 2) (- (* 2/45 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* 1/3 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))) (* -1 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))))) (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1/2 (* phi2 (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1 (* phi2 (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* -1/2 (* phi2 (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/6 (* phi2 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* phi2 (cos (neg lambda2)))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* phi2 (+ (cos (neg lambda2)) (* -1/2 (* phi2 (sin (neg lambda2))))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* phi2 (+ (cos (neg lambda2)) (* phi2 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* phi2 (cos (neg lambda2))))))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* phi2 (sin (neg lambda2))))) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* phi2 (- (* -1/2 (* phi2 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* phi2 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 lambda2)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 lambda2)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 lambda2)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 lambda2)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (patch #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 phi2 lambda2)) (patch (sin.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi2 lambda2)) (patch (cos.f64 (-.f64 phi2 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (+ 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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* 1/24 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))) (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* 1/24 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* -1/24 (/ (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* -1/720 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))))) (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))) (+ (* 1/24 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))) (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor 0 phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (pow phi1 2))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor 0 phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor 0 phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor 0 phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (taylor 0 phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (taylor 0 phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (+ 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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (+ 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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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
28.0ms
phi2
@inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (/ 1 (/ (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2)) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))) (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2)) (sin (- phi2 lambda2)) (cos (- phi2 lambda2)) (cos (* 2 (- lambda1 lambda2))) (cos (- lambda2 lambda1)))
12.0ms
lambda2
@inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (/ 1 (/ (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2)) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))) (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2)) (sin (- phi2 lambda2)) (cos (- phi2 lambda2)) (cos (* 2 (- lambda1 lambda2))) (cos (- lambda2 lambda1)))
7.0ms
phi2
@-inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (/ 1 (/ (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2)) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))) (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2)) (sin (- phi2 lambda2)) (cos (- phi2 lambda2)) (cos (* 2 (- lambda1 lambda2))) (cos (- lambda2 lambda1)))
7.0ms
lambda1
@inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (/ 1 (/ (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2)) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))) (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2)) (sin (- phi2 lambda2)) (cos (- phi2 lambda2)) (cos (* 2 (- lambda1 lambda2))) (cos (- lambda2 lambda1)))
6.0ms
lambda1
@-inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (/ 1 (/ (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2)) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))) (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2)) (sin (- phi2 lambda2)) (cos (- phi2 lambda2)) (cos (* 2 (- lambda1 lambda2))) (cos (- lambda2 lambda1)))

simplify266.0ms (1.3%)

Memory
-13.1MiB live, 297.1MiB allocated
Algorithm
1×egg-herbie
Rules
10 432×lower-fma.f64
10 432×lower-fma.f32
7 916×lower-+.f64
7 916×lower-+.f32
6 344×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0115924502
1385223923
0886222337
Stop Event
1×iter limit
1×node limit
Counts
1 152 → 1 144
Calls
Call 1
Inputs
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))))
(+ (* 1/2 (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))) (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))) (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))))))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))) (* 1/2 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* lambda1 (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* lambda1 (- (+ (* lambda1 (- (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* lambda1 (- (+ (* lambda1 (- (+ (* lambda1 (- (* -2/3 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))))) (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))
(+ (* -1 (* lambda1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(+ (* lambda1 (+ (* -1 (* lambda1 (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* -1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(+ (* lambda1 (+ (* -1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* lambda1 (+ (* -1 (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* 2/3 (* lambda1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda1 (- (* lambda1 (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* -1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda1 (- (* lambda1 (- (* -2/3 (* lambda1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* -1 (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 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))))))))
(+ (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 (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (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))))))))
(sin (- phi2 lambda2))
(+ (sin (- phi2 lambda2)) (* lambda1 (cos (- phi2 lambda2))))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* -1/2 (* lambda1 (sin (- phi2 lambda2)))))))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (- phi2 lambda2))) (* -1/6 (* lambda1 (cos (- phi2 lambda2)))))))))
(sin (neg (+ lambda2 phi2)))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (cos (neg (+ lambda2 phi2)))))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* -1/2 (* lambda1 (sin (neg (+ lambda2 phi2))))))))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/6 (* lambda1 (cos (neg (+ lambda2 phi2))))))))))
(cos (* -2 lambda2))
(+ (cos (* -2 lambda2)) (* -2 (* lambda1 (sin (* -2 lambda2)))))
(+ (cos (* -2 lambda2)) (* lambda1 (- (* -2 (* lambda1 (cos (* -2 lambda2)))) (* 2 (sin (* -2 lambda2))))))
(+ (cos (* -2 lambda2)) (* lambda1 (- (* lambda1 (+ (* -2 (cos (* -2 lambda2))) (* 4/3 (* lambda1 (sin (* -2 lambda2)))))) (* 2 (sin (* -2 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 (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- 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 (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(+ (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 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))
(* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))
(* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))
(* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (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)))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos (* -2 (+ 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 (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ (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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))))
(+ (* 1/2 (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))) (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))) (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))))))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* lambda2 (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* lambda2 (- (+ (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* lambda2 (- (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* lambda2 (- (+ (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* lambda2 (- (+ (* lambda2 (- (* 2/3 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))
(+ (* lambda2 (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(+ (* lambda2 (+ (* -1 (* lambda2 (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1 (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* -2/3 (* lambda2 (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))))) (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(- (+ 1/2 (+ (* -1 (* lambda2 (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* 1/2 (cos (* 2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda2 (- (* lambda2 (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda2 (- (* lambda2 (- (* 2/3 (* lambda2 (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* -1 (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 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)))))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(+ (cos phi1) (* (cos 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 phi2))
(+ (sin (+ lambda1 phi2)) (* -1 (* lambda2 (cos (+ lambda1 phi2)))))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1/2 (* lambda2 (sin (+ lambda1 phi2)))))))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* 1/6 (* lambda2 (cos (+ lambda1 phi2)))))))))
(sin (- lambda1 phi2))
(+ (sin (- lambda1 phi2)) (* -1 (* lambda2 (cos (- lambda1 phi2)))))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* -1/2 (* lambda2 (sin (- lambda1 phi2)))))))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (- lambda1 phi2))) (* 1/6 (* lambda2 (cos (- lambda1 phi2)))))))))
(sin phi2)
(+ (sin phi2) (* -1 (* lambda2 (cos phi2))))
(+ (sin phi2) (* lambda2 (+ (* -1 (cos phi2)) (* -1/2 (* lambda2 (sin phi2))))))
(+ (sin phi2) (* lambda2 (+ (* -1 (cos phi2)) (* lambda2 (+ (* -1/2 (sin phi2)) (* 1/6 (* lambda2 (cos phi2))))))))
(cos phi2)
(+ (cos phi2) (* lambda2 (sin phi2)))
(+ (cos phi2) (* lambda2 (- (* -1/2 (* lambda2 (cos phi2))) (* -1 (sin phi2)))))
(+ (cos phi2) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos phi2)) (* -1/6 (* lambda2 (sin phi2))))) (* -1 (sin phi2)))))
(cos (* 2 lambda1))
(+ (cos (* 2 lambda1)) (* 2 (* lambda2 (sin (* 2 lambda1)))))
(+ (cos (* 2 lambda1)) (* lambda2 (- (* -2 (* lambda2 (cos (* 2 lambda1)))) (* -2 (sin (* 2 lambda1))))))
(+ (cos (* 2 lambda1)) (* lambda2 (- (* lambda2 (+ (* -2 (cos (* 2 lambda1))) (* -4/3 (* lambda2 (sin (* 2 lambda1)))))) (* -2 (sin (* 2 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 (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(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))))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- phi2 lambda2))
(sin (- phi2 lambda2))
(sin (- phi2 lambda2))
(sin (- phi2 lambda2))
(cos (- phi2 lambda2))
(cos (- phi2 lambda2))
(cos (- phi2 lambda2))
(cos (- phi2 lambda2))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- 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 (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(+ (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 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (+ phi2 (* -1 lambda2)))
(sin (+ phi2 (* -1 lambda2)))
(sin (+ phi2 (* -1 lambda2)))
(sin (+ phi2 (* -1 lambda2)))
(cos (+ phi2 (* -1 lambda2)))
(cos (+ phi2 (* -1 lambda2)))
(cos (+ phi2 (* -1 lambda2)))
(cos (+ phi2 (* -1 lambda2)))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos (* 2 (+ 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 (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
1
(+ 1 (* -1/2 (pow phi2 2)))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* 1/2 (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/2 (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(/ (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (* -1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* -1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (* 2/45 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(+ 1/2 (+ (* -1 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (* 1/3 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* 1/3 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))))))))
(- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow phi2 2) (- (* -1/3 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* -1 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow phi2 2) (- (* (pow phi2 2) (- (* 2/45 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* 1/3 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))) (* -1 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ (cos 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))))))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* phi2 (cos (- lambda1 lambda2))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1 (* phi2 (cos (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* phi2 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* phi2 (+ (cos (neg lambda2)) (* -1/2 (* phi2 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* phi2 (+ (cos (neg lambda2)) (* phi2 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* phi2 (cos (neg lambda2)))))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* phi2 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* phi2 (- (* -1/2 (* phi2 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* phi2 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- phi2 lambda2))
(sin (- phi2 lambda2))
(sin (- phi2 lambda2))
(sin (- phi2 lambda2))
(cos (- phi2 lambda2))
(cos (- phi2 lambda2))
(cos (- phi2 lambda2))
(cos (- phi2 lambda2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (neg (+ lambda2 (* -1 phi2))))
(sin (neg (+ lambda2 (* -1 phi2))))
(sin (neg (+ lambda2 (* -1 phi2))))
(sin (neg (+ lambda2 (* -1 phi2))))
(cos (neg (+ lambda2 (* -1 phi2))))
(cos (neg (+ lambda2 (* -1 phi2))))
(cos (neg (+ lambda2 (* -1 phi2))))
(cos (neg (+ lambda2 (* -1 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 (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))
(- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* 1/24 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))) (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* 1/24 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* -1/24 (/ (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* -1/720 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))))) (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))) (+ (* 1/24 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))) (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1 (* -1 (pow phi1 2))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
1
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos 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 (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos 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 (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos 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) lambda1) (*.f64 (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) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.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 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 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (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 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) #s(literal -1/2 binary64))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (cos 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) lambda1) (*.f64 (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) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.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 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 phi2 lambda2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))) (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 phi2 lambda2))) lambda1 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 phi2 lambda2)))))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))) (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 phi2 lambda2)))) lambda1 (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 phi2 lambda2))))) lambda1 (*.f64 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 phi2 lambda2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))) (* 1/2 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 phi2 lambda2))) (*.f64 (*.f64 #s(literal -1/6 binary64) (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 phi2 lambda2)))) lambda1))) lambda1 (*.f64 (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 phi2 lambda2))) #s(literal 1/2 binary64))) lambda1 (*.f64 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 phi2 lambda2))) #s(literal 1/2 binary64)))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* lambda1 (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(-.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))) lambda1 (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* lambda1 (- (+ (* lambda1 (- (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(-.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal -2 binary64) lambda2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) lambda1 (fma.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))))) lambda1 (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* lambda1 (- (+ (* lambda1 (- (+ (* lambda1 (- (* -2/3 (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))))))) (/ (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2)))))) (/ (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda2) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos lambda2) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda2) (cos phi2))))))) (/ (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos lambda2) (cos phi2)))))
(-.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal -2/3 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal -2 binary64) lambda2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (sin.f64 lambda2)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) #s(literal 1/6 binary64))))) lambda1 (-.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal -2 binary64) lambda2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))) lambda1 (fma.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))))) lambda1 (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* -1 (* lambda1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(fma.f64 (neg.f64 lambda1) (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+ (* lambda1 (+ (* -1 (* lambda1 (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* -1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(fma.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) lambda1 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))))) lambda1 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+ (* lambda1 (+ (* -1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* lambda1 (+ (* -1 (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* 2/3 (* lambda1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(fma.f64 (+.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) lambda1 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2))))) (*.f64 (*.f64 (*.f64 #s(literal 2/3 binary64) lambda1) (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) lambda1)) lambda1 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(-.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) lambda1) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda1 (- (* lambda1 (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* -1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(-.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) lambda1 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)))) lambda1 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda1 (- (* lambda1 (- (* -2/3 (* lambda1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* -1 (* (cos (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -1 (* (sin (* -2 lambda2)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))))) (* (+ 1/2 (* 1/2 (cos (* -2 lambda2)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2/3 binary64) lambda1) (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)))) lambda1 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) lambda1 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(* lambda1 (cos lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (cos.f64 lambda2)) lambda1)
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1) (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2))) (*.f64 lambda1 lambda1) (cos.f64 lambda2)) lambda1)
(+ (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) lambda1) (*.f64 (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) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.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 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (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) lambda1) (*.f64 (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) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.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 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (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 #s(literal -1/2 binary64) (*.f64 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))))))))
(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 phi2) (cos.f64 phi1)))
(sin (- phi2 lambda2))
(sin.f64 (-.f64 phi2 lambda2))
(+ (sin (- phi2 lambda2)) (* lambda1 (cos (- phi2 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* -1/2 (* lambda1 (sin (- phi2 lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (-.f64 phi2 lambda2)) (cos.f64 (-.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (- phi2 lambda2))) (* -1/6 (* lambda1 (cos (- phi2 lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 (-.f64 lambda2 phi2)) (*.f64 (sin.f64 (-.f64 phi2 lambda2)) #s(literal -1/2 binary64))) lambda1 (cos.f64 (-.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(sin (neg (+ lambda2 phi2)))
(sin.f64 (-.f64 (neg.f64 lambda2) phi2))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (cos (neg (+ lambda2 phi2)))))
(fma.f64 (cos.f64 (+.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* -1/2 (* lambda1 (sin (neg (+ lambda2 phi2))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (-.f64 (neg.f64 lambda2) phi2)) (cos.f64 (+.f64 phi2 lambda2))) lambda1 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/6 (* lambda1 (cos (neg (+ lambda2 phi2))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 (+.f64 phi2 lambda2)) (*.f64 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)) #s(literal -1/2 binary64))) lambda1 (cos.f64 (+.f64 phi2 lambda2))) lambda1 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)))
(cos (* -2 lambda2))
(cos.f64 (*.f64 #s(literal -2 binary64) lambda2))
(+ (cos (* -2 lambda2)) (* -2 (* lambda1 (sin (* -2 lambda2)))))
(fma.f64 (*.f64 #s(literal -2 binary64) lambda1) (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)))
(+ (cos (* -2 lambda2)) (* lambda1 (- (* -2 (* lambda1 (cos (* -2 lambda2)))) (* 2 (sin (* -2 lambda2))))))
(fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) lambda1 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)))) lambda1 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)))
(+ (cos (* -2 lambda2)) (* lambda1 (- (* lambda1 (+ (* -2 (cos (* -2 lambda2))) (* 4/3 (* lambda1 (sin (* -2 lambda2)))))) (* 2 (sin (* -2 lambda2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 4/3 binary64) lambda1) (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal -2 binary64))) lambda1 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal -2 binary64))) lambda1 (cos.f64 (*.f64 #s(literal -2 binary64) 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 (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 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))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(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 (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 lambda1) (cos.f64 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 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 lambda1) (cos.f64 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 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 lambda1) (cos.f64 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 lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (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))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (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))
(+ (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 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1)))))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (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 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))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64)))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64)))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64)))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64)))
(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 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.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 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 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 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (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 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))) (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2))) lambda2 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2)))))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))) (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2)))) lambda2 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2))))) lambda2 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) (*.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (cos.f64 (-.f64 lambda1 phi2)) (cos.f64 (+.f64 lambda1 phi2)))) lambda2))) lambda2 (*.f64 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64))) lambda2 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64)))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* lambda2 (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) #s(literal 1/2 binary64) (-.f64 (fma.f64 (neg.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) lambda2 (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* lambda2 (- (+ (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* lambda2 (- (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) #s(literal 1/2 binary64) (-.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (neg.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) lambda2 (neg.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) lambda2 (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* lambda2 (- (+ (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* lambda2 (- (+ (* lambda2 (- (* 2/3 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (/ (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))))) (/ (* (cos phi2) (* (sin (neg lambda1)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda1))))))
(fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) #s(literal 1/2 binary64) (-.f64 (fma.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) #s(literal 2/3 binary64) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (neg.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) lambda2 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (neg.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) lambda2 (neg.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) lambda2 (/.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* lambda2 (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) lambda2 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+ (* lambda2 (+ (* -1 (* lambda2 (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 lambda2)) lambda2 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) lambda2 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1 (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* -2/3 (* lambda2 (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))))) (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2/3 binary64) lambda2) (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) lambda2) lambda2 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) lambda2 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* -1 (* lambda2 (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* 1/2 (cos (* 2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(-.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 lambda2) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda2 (- (* lambda2 (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))) (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(-.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) lambda2 (neg.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1))))) lambda2 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda2 (- (* lambda2 (- (* 2/3 (* lambda2 (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))) (* -1 (* (cos (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (sin (* 2 lambda1)) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))))) (* (+ 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ 1/2 (* 1/2 (cos (* 2 phi2))))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2/3 binary64) lambda2) (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) lambda2 (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) lambda2 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1))
(+ (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 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.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)))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos phi1) (* (cos 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 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.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 phi2))
(sin.f64 (+.f64 lambda1 phi2))
(+ (sin (+ lambda1 phi2)) (* -1 (* lambda2 (cos (+ lambda1 phi2)))))
(fma.f64 (cos.f64 (+.f64 lambda1 phi2)) (neg.f64 lambda2) (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1/2 (* lambda2 (sin (+ lambda1 phi2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (+.f64 lambda1 phi2)) (neg.f64 (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* 1/6 (* lambda2 (cos (+ lambda1 phi2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (cos.f64 (+.f64 lambda1 phi2)) (*.f64 (sin.f64 (+.f64 lambda1 phi2)) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (sin.f64 (+.f64 lambda1 phi2)))
(sin (- lambda1 phi2))
(sin.f64 (-.f64 lambda1 phi2))
(+ (sin (- lambda1 phi2)) (* -1 (* lambda2 (cos (- lambda1 phi2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 phi2)) (neg.f64 lambda2) (sin.f64 (-.f64 lambda1 phi2)))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* -1/2 (* lambda2 (sin (- lambda1 phi2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (-.f64 lambda1 phi2)) (neg.f64 (cos.f64 (-.f64 lambda1 phi2)))) lambda2 (sin.f64 (-.f64 lambda1 phi2)))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (- lambda1 phi2))) (* 1/6 (* lambda2 (cos (- lambda1 phi2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (cos.f64 (-.f64 lambda1 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 phi2)) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 (-.f64 lambda1 phi2)))) lambda2 (sin.f64 (-.f64 lambda1 phi2)))
(sin phi2)
(sin.f64 phi2)
(+ (sin phi2) (* -1 (* lambda2 (cos phi2))))
(fma.f64 (neg.f64 lambda2) (cos.f64 phi2) (sin.f64 phi2))
(+ (sin phi2) (* lambda2 (+ (* -1 (cos phi2)) (* -1/2 (* lambda2 (sin phi2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 phi2) (neg.f64 (cos.f64 phi2))) lambda2 (sin.f64 phi2))
(+ (sin phi2) (* lambda2 (+ (* -1 (cos phi2)) (* lambda2 (+ (* -1/2 (sin phi2)) (* 1/6 (* lambda2 (cos phi2))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 phi2) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 phi2))) lambda2 (sin.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* lambda2 (sin phi2)))
(fma.f64 (sin.f64 phi2) lambda2 (cos.f64 phi2))
(+ (cos phi2) (* lambda2 (- (* -1/2 (* lambda2 (cos phi2))) (* -1 (sin phi2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) lambda2) #s(literal -1/2 binary64) (sin.f64 phi2)) lambda2 (cos.f64 phi2))
(+ (cos phi2) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos phi2)) (* -1/6 (* lambda2 (sin phi2))))) (* -1 (sin phi2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 phi2) lambda2) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) lambda2 (sin.f64 phi2)) lambda2 (cos.f64 phi2))
(cos (* 2 lambda1))
(cos.f64 (*.f64 #s(literal 2 binary64) lambda1))
(+ (cos (* 2 lambda1)) (* 2 (* lambda2 (sin (* 2 lambda1)))))
(fma.f64 (*.f64 #s(literal 2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))
(+ (cos (* 2 lambda1)) (* lambda2 (- (* -2 (* lambda2 (cos (* 2 lambda1)))) (* -2 (sin (* 2 lambda1))))))
(fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) lambda2 (neg.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1))))) lambda2 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))
(+ (cos (* 2 lambda1)) (* lambda2 (- (* lambda2 (+ (* -2 (cos (* 2 lambda1))) (* -4/3 (* lambda2 (sin (* 2 lambda1)))))) (* -2 (sin (* 2 lambda1))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -4/3 binary64) lambda2) (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal -2 binary64))) lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 2 binary64))) lambda2 (cos.f64 (*.f64 #s(literal 2 binary64) 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 (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 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 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- phi2 lambda2))
(sin.f64 (-.f64 phi2 lambda2))
(sin (- phi2 lambda2))
(sin.f64 (-.f64 phi2 lambda2))
(sin (- phi2 lambda2))
(sin.f64 (-.f64 phi2 lambda2))
(sin (- phi2 lambda2))
(sin.f64 (-.f64 phi2 lambda2))
(cos (- phi2 lambda2))
(cos.f64 (-.f64 lambda2 phi2))
(cos (- phi2 lambda2))
(cos.f64 (-.f64 lambda2 phi2))
(cos (- phi2 lambda2))
(cos.f64 (-.f64 lambda2 phi2))
(cos (- phi2 lambda2))
(cos.f64 (-.f64 lambda2 phi2))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(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 (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (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 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2)))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (+ 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 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 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (+ phi2 (* -1 lambda2)))
(sin.f64 (-.f64 phi2 lambda2))
(sin (+ phi2 (* -1 lambda2)))
(sin.f64 (-.f64 phi2 lambda2))
(sin (+ phi2 (* -1 lambda2)))
(sin.f64 (-.f64 phi2 lambda2))
(sin (+ phi2 (* -1 lambda2)))
(sin.f64 (-.f64 phi2 lambda2))
(cos (+ phi2 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 phi2))
(cos (+ phi2 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 phi2))
(cos (+ phi2 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 phi2))
(cos (+ phi2 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 phi2))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(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 (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))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 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 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 (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 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (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 (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (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)))
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)))))))))
(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 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (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 (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/2 (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(fma.f64 (fma.f64 (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 0 binary64) phi2) #s(literal 1/2 binary64))) phi2 #s(literal 0 binary64)) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(/ (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (*.f64 phi2 phi2) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (* -1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 (-.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1/3 binary64) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #s(literal -1/2 binary64)))) (*.f64 phi2 phi2) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (+ (* -1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (* (pow phi2 2) (- (* 2/45 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* 1/720 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1/3 (/ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) (- (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (+ (* -1/24 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (+ (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda2 lambda1))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1)))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2))))) (- (cos phi1) (cos (- lambda2 lambda1)))))))))) (* 1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda2 lambda1))) 2)))))) (* 1/2 (/ (cos (* 2 (- lambda1 lambda2))) (- (cos phi1) (cos (- lambda2 lambda1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 2/45 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1/3 binary64) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (*.f64 phi2 phi2) (-.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1/3 binary64) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))) (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #s(literal -1/2 binary64)))) (*.f64 phi2 phi2) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (* 1/3 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/3 binary64) (*.f64 phi2 phi2) #s(literal -1 binary64))) (*.f64 phi2 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* 1/3 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -2/45 binary64) (*.f64 phi2 phi2) #s(literal 1/3 binary64))) (*.f64 phi2 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(- (* 1/2 (cos (* 2 phi1))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(fma.f64 (*.f64 phi2 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow phi2 2) (- (* -1/3 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* -1 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/3 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow phi2 2) (- (* (pow phi2 2) (- (* 2/45 (* (pow phi2 2) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (* 1/3 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))) (* -1 (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))))) (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 2/45 binary64) (*.f64 phi2 phi2) #s(literal -1/3 binary64))) (*.f64 phi2 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 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)))
(+ (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)))
(+ (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 phi2 phi2) #s(literal -1/2 binary64)) (cos.f64 lambda1) (+.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)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* phi2 (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) phi2 (cos.f64 (-.f64 lambda1 lambda2))) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1 (* phi2 (cos (- lambda1 lambda2)))))
(fma.f64 (neg.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi2) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) phi2 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* phi2 (cos (neg lambda2))))
(fma.f64 phi2 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* phi2 (+ (cos (neg lambda2)) (* -1/2 (* phi2 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) phi2 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* phi2 (+ (cos (neg lambda2)) (* phi2 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* phi2 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) #s(literal -1/2 binary64))) phi2 (cos.f64 lambda2)) phi2 (neg.f64 (sin.f64 lambda2)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* phi2 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) phi2 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* phi2 (- (* -1/2 (* phi2 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 lambda2) (sin.f64 lambda2)) phi2 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* phi2 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi2) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) phi2 (sin.f64 lambda2)) phi2 (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 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 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))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- phi2 lambda2))
(sin.f64 (-.f64 phi2 lambda2))
(sin (- phi2 lambda2))
(sin.f64 (-.f64 phi2 lambda2))
(sin (- phi2 lambda2))
(sin.f64 (-.f64 phi2 lambda2))
(sin (- phi2 lambda2))
(sin.f64 (-.f64 phi2 lambda2))
(cos (- phi2 lambda2))
(cos.f64 (-.f64 lambda2 phi2))
(cos (- phi2 lambda2))
(cos.f64 (-.f64 lambda2 phi2))
(cos (- phi2 lambda2))
(cos.f64 (-.f64 lambda2 phi2))
(cos (- phi2 lambda2))
(cos.f64 (-.f64 lambda2 phi2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (neg (* -2 phi2))))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 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))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 lambda1 (+.f64 phi2 lambda2)))
(sin (neg (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 phi2 lambda2))
(sin (neg (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 phi2 lambda2))
(sin (neg (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 phi2 lambda2))
(sin (neg (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 phi2 lambda2))
(cos (neg (+ lambda2 (* -1 phi2))))
(cos.f64 (-.f64 lambda2 phi2))
(cos (neg (+ lambda2 (* -1 phi2))))
(cos.f64 (-.f64 lambda2 phi2))
(cos (neg (+ lambda2 (* -1 phi2))))
(cos.f64 (-.f64 lambda2 phi2))
(cos (neg (+ lambda2 (* -1 phi2))))
(cos.f64 (-.f64 lambda2 phi2))
(+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (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 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 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 (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) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (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 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 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 (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) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(fma.f64 (*.f64 (neg.f64 phi1) phi1) (fma.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* 1/24 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))) (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (fma.f64 (/.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/24 binary64)))) (*.f64 phi1 phi1) (neg.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))) (*.f64 phi1 phi1) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* 1/24 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* -1/24 (/ (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (+ (* -1/720 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))))) (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))) (+ (* 1/24 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))))) (+ (* -1/2 (/ (- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (pow (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))))) (/ (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (neg.f64 phi1) phi1) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (fma.f64 (/.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/24 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal -1/24 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal -1/720 binary64) (/.f64 #s(literal 2/45 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))) (-.f64 (/.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (fma.f64 (/.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal 1/24 binary64))))) (*.f64 phi1 phi1) (neg.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))) (*.f64 phi1 phi1) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(- 1 (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1 (* -1 (pow phi1 2))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) (*.f64 phi1 phi1) #s(literal -1 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow phi1 2)))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) (*.f64 phi1 phi1) #s(literal -1 binary64)) (*.f64 phi1 phi1) #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 phi1 phi1) #s(literal -1/2 binary64) (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 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 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 (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) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (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 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 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 (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) (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 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 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 (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) (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 (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 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 (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 phi2 lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/ (- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (* (+ 1/2 (* 1/2 (cos (* 2 phi2)))) (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 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))

rewrite208.0ms (1%)

Memory
35.7MiB live, 220.1MiB allocated
Rules
4 242×lower-*.f32
4 224×lower-*.f64
4 150×lower-fma.f32
4 138×lower-fma.f64
2 632×lower-pow.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
077532
0143492
1566440
24679440
08738427
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
31 → 691
Calls
Call 1
Inputs
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(*.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)))
(cos.f64 (-.f64 lambda1 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))
#s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin.f64 (-.f64 phi2 lambda2))
(cos.f64 (-.f64 phi2 lambda2))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
Outputs
(*.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(*.f64 (/.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (/.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (/.f64 #s(literal 1 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)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(*.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (neg.f64 (log.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1 binary64))
(pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)))) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (cos.f64 phi2) #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 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi2) #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 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (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)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))
(fma.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 phi2)))) #s(literal 1/2 binary64) (cos.f64 phi1))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(-.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(exp.f64 (*.f64 (neg.f64 (log.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64)))
(+.f64 (+.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1)))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (*.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.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 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(*.f64 (fma.f64 (*.f64 lambda1 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 3 binary64))) (/.f64 #s(literal 1 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))))
(pow.f64 (/.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)))) (-.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (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)) (fma.f64 (*.f64 lambda1 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 3 binary64)))) #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 (neg.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)))) (neg.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))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 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 3 binary64)))) (neg.f64 (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 (*.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 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 (fma.f64 (*.f64 lambda1 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 3 binary64))) (+.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 (*.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 (fma.f64 (*.f64 lambda1 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 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 #s(literal 1 binary64) (/.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)))) (-.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 #s(literal 1 binary64) (/.f64 (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)) (fma.f64 (*.f64 lambda1 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 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (atan2.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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1))))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))) (/.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (sin.f64 lambda2) #s(literal -1 binary64)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (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 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (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 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (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 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64))) (-.f64 lambda1 (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 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 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 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (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 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (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 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 lambda1 (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 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (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)))))
(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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1))))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi2) (*.f64 (sin.f64 #s(literal 0 binary64)) (sin.f64 phi2)))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (*.f64 (sin.f64 #s(literal 0 binary64)) (sin.f64 phi2)))
(*.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(*.f64 (/.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (/.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (/.f64 #s(literal 1 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)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(*.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (neg.f64 (log.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1 binary64))
(pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)))) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (cos.f64 phi2) #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 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi2) #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 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (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)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))
(fma.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 phi2)))) #s(literal 1/2 binary64) (cos.f64 phi1))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(-.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(exp.f64 (*.f64 (neg.f64 (log.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64)))
(+.f64 (+.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1)))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (*.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))))
(*.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))) #s(literal 1/2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)))))) #s(literal 1/2 binary64)) (-.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))) (pow.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))))) (-.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #s(literal 3 binary64)))) (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))) (pow.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 #s(literal 1/2 binary64) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))))
(fma.f64 #s(literal 1/2 binary64) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64) (*.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #s(literal 1/2 binary64)))
(fma.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)) (*.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (*.f64 #s(literal 1/2 binary64) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(*.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(*.f64 (/.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (/.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (/.f64 #s(literal 1 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)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(*.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (neg.f64 (log.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1 binary64))
(pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)))) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (cos.f64 phi2) #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 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi2) #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 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (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)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))
(fma.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 phi2)))) #s(literal 1/2 binary64) (cos.f64 phi1))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(-.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(exp.f64 (*.f64 (neg.f64 (log.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64)))
(+.f64 (+.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1)))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (*.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (pow.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 phi2)))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))
(/.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2))))))
(/.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64))
(/.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))) #s(literal 2 binary64))
(/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64)))))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2))))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 (+.f64 phi2 phi2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 (+.f64 phi2 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 (+.f64 phi2 phi2))) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 6 binary64)) #s(literal 1/8 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 (+.f64 phi2 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 (+.f64 phi2 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(/.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64))))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2))))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2))))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64))))))
(/.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2)))))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2)))))))
(/.f64 (pow.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 phi2))))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 phi2)))) (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal 4 binary64))
(/.f64 (pow.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 phi2)))) #s(literal 2 binary64)) #s(literal 4 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
(fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (+.f64 phi2 phi2))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) #s(literal 1/4 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 (+.f64 phi2 phi2))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 (+.f64 phi2 phi2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (+.f64 phi2 phi2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 (+.f64 phi2 phi2))))
(fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 (+.f64 phi2 phi2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 (+.f64 phi2 phi2))))
(+.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 (+.f64 phi2 phi2))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
(*.f64 (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(pow.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) #s(literal 2 binary64))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)))) (+.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (-.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) #s(literal 2 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) (neg.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64))) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 phi2) #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 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)))))
(fma.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(fma.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(fma.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(fma.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)) (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi2) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(-.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
(+.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) #s(literal 1/2 binary64))
(+.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(+.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
(+.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64))))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2)))))))
(*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)))
(*.f64 (cos.f64 phi2) (cos.f64 phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2))))) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (cos.f64 phi2) #s(literal 2 binary64))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2)))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi2))))) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))))
(fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi2))))) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (neg.f64 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(pow.f64 (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.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)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) (neg.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.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 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
(pow.f64 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 phi2)) (cos.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (cos.f64 phi1))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (-.f64 (neg.f64 lambda2) phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 (neg.f64 lambda2) phi2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) (neg.f64 phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (neg.f64 phi2)))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (neg.f64 (+.f64 lambda2 phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 (+.f64 lambda2 phi2)))))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (sin.f64 phi2))))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 (-.f64 lambda1 lambda2) phi2)))) (*.f64 (cos.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (-.f64 lambda1 lambda2) phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 (-.f64 lambda1 lambda2) phi2)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 lambda1 lambda2)) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2) (*.f64 phi2 (+.f64 (-.f64 lambda1 lambda2) phi2))))) (cos.f64 (/.f64 (*.f64 (*.f64 phi2 phi2) phi2) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2) (*.f64 phi2 (+.f64 (-.f64 lambda1 lambda2) phi2)))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 lambda1 lambda2)) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2) (*.f64 phi2 (+.f64 (-.f64 lambda1 lambda2) phi2))))) (sin.f64 (/.f64 (*.f64 (*.f64 phi2 phi2) phi2) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2) (*.f64 phi2 (+.f64 (-.f64 lambda1 lambda2) phi2)))))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (neg.f64 phi2)))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 (neg.f64 phi2)))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (+.f64 lambda2 phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (+.f64 lambda2 phi2))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 (neg.f64 lambda2) phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 (neg.f64 lambda2) phi2))))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) (neg.f64 phi2)))) (*.f64 (cos.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (neg.f64 phi2)))))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (neg.f64 (+.f64 lambda2 phi2)))) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 (+.f64 lambda2 phi2)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda2 phi2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi2) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))))))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 lambda2)))
(fma.f64 (sin.f64 phi2) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 phi2) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 phi2) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 phi2) (neg.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 phi2) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))
(sin.f64 (-.f64 phi2 lambda2))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 lambda2 phi2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 phi2)))) (*.f64 (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 lambda2 phi2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 phi2)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 phi2 phi2) phi2) (fma.f64 lambda2 (+.f64 lambda2 phi2) (*.f64 phi2 phi2)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 phi2) (*.f64 phi2 phi2))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 phi2 phi2) phi2) (fma.f64 lambda2 (+.f64 lambda2 phi2) (*.f64 phi2 phi2)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 phi2) (*.f64 phi2 phi2))))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))
(+.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 lambda2)) (neg.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))))
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 phi2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 lambda2 phi2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 lambda2 phi2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 phi2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 phi2 phi2) phi2) (fma.f64 lambda2 (+.f64 lambda2 phi2) (*.f64 phi2 phi2)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 phi2) (*.f64 phi2 phi2)))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 phi2 phi2) phi2) (fma.f64 lambda2 (+.f64 lambda2 phi2) (*.f64 phi2 phi2)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 phi2) (*.f64 phi2 phi2))))))
(fma.f64 (sin.f64 phi2) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 phi2))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (-.f64 lambda2 phi2))
(cos.f64 (-.f64 phi2 lambda2))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 lambda2 phi2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 phi2)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 lambda2 phi2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 phi2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 phi2 phi2) phi2) (fma.f64 lambda2 (+.f64 lambda2 phi2) (*.f64 phi2 phi2)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 phi2) (*.f64 phi2 phi2))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 phi2 phi2) phi2) (fma.f64 lambda2 (+.f64 lambda2 phi2) (*.f64 phi2 phi2)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 phi2) (*.f64 phi2 phi2))))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 lambda2)))
(*.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 4 binary64)) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 6 binary64)) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))))
(fma.f64 (pow.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal 2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(fma.f64 (pow.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))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (pow.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))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(fma.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64))))) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda2) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 lambda2)))) (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 2 binary64) (neg.f64 lambda2)))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(pow.f64 (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.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)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) (neg.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.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 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))

eval421.0ms (2%)

Memory
14.8MiB live, 480.4MiB allocated
Compiler

Compiled 91 154 to 5 328 computations (94.2% saved)

prune335.0ms (1.6%)

Memory
-2.9MiB live, 485.9MiB allocated
Pruning

71 alts after pruning (71 fresh and 0 done)

PrunedKeptTotal
New2 123392 162
Fresh213253
Picked505
Done000
Total2 149712 220
Accuracy
100.0%
Counts
2 220 → 71
Alt Table
Click to see full alt table
StatusAccuracyProgram
94.4%
(fma.f64 lambda1 (/.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
68.5%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 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 lambda1)) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
94.4%
(+.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
78.3%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (cos.f64 phi2)) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶78.2%
(+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
93.7%
(+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
93.7%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (sin (+ lambda2 lambda1)) (fma.f64 (cos.f64 lambda2) lambda1 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
68.6%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (sin (+ lambda2 lambda1)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.4%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.1%
(+.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))))))
94.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
65.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
▶72.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
73.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
73.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
65.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
72.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
97.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)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
▶99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
80.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
78.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)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
80.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (cos.f64 lambda2)) 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)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
78.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (pow.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
94.0%
(+.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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
93.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.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))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))))
94.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 #s(approx (cos (* 2 (- lambda1 lambda2))) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
98.2%
(+.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.2%
(+.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))))
98.2%
(+.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.5%
(+.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))))))
78.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64)))))
87.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ 1 (/ (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))))) (/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))
74.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ 1 (/ (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))
80.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.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 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
97.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
81.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 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
81.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))))))
69.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
81.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
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))))))
69.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)))))
70.4%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
75.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (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)))))
▶70.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
73.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
72.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
75.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 3 binary64)) (pow.f64 (cos.f64 phi1) #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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
75.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 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (/.f64 #s(literal 1 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
73.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
65.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 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi1 phi1) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
66.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
75.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
68.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.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
75.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
75.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
68.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
66.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) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
75.5%
(+.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) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
75.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
▶60.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
71.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
98.0%
(*.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)))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
98.1%
#s(approx (+ lambda1 (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
99.7%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
Compiler

Compiled 4 976 to 2 708 computations (45.6% saved)

simplify147.0ms (0.7%)

Memory
3.8MiB live, 119.9MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
cost-diff128
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))
cost-diff128
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))
cost-diff192
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))
cost-diff0
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
cost-diff0
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
cost-diff0
(+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
cost-diff14208
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
cost-diff0
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
cost-diff0
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
cost-diff0
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
cost-diff0
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
cost-diff0
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
cost-diff0
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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
14 308×lower-fma.f32
14 300×lower-fma.f64
3 462×lower-*.f32
3 438×lower-*.f64
2 304×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
084995
0145989
1227989
2376989
3759953
41627947
53832947
66846947
08255927
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
lambda1
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
(+.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
lambda2
phi2
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(-.f64 (-.f64 lambda1 lambda2) phi2)
#s(literal 1/2 binary64)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 phi1)
phi1
(+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
lambda1
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 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 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
lambda2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(cos.f64 phi2)
phi2
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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))
(cos.f64 (-.f64 lambda1 lambda2))
#s(literal 1 binary64)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))
(-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) lambda2))
(*.f64 #s(literal 2 binary64) lambda2)
#s(literal 2 binary64)
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))
(cos.f64 (*.f64 #s(literal 2 binary64) lambda1))
(*.f64 #s(literal 2 binary64) lambda1)
(pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(cos.f64 lambda1)
(sin.f64 lambda2)
(sin.f64 (+.f64 lambda1 lambda2))
(+.f64 lambda1 lambda2)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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)
lambda2
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))))
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
(+.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
lambda2
phi2
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(-.f64 (-.f64 lambda1 lambda2) phi2)
#s(literal 1/2 binary64)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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))
(cos.f64 phi1)
phi1
(+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)
lambda1
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))
(sin.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
lambda2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(cos.f64 phi2)
phi2
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
#s(literal 1 binary64)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (fma.f64 (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (fma.f64 (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (fma.f64 (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))
(fma.f64 (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1 binary64)) (fma.f64 #s(literal -1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/4 binary64)) (neg.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1 binary64)) (fma.f64 #s(literal -1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/4 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))
(*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64))
(cos.f64 (*.f64 #s(literal 2 binary64) lambda2))
(*.f64 #s(literal 2 binary64) lambda2)
#s(literal 2 binary64)
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))
(*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))
(cos.f64 (*.f64 #s(literal 2 binary64) lambda1))
(*.f64 #s(literal 2 binary64) lambda1)
(pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(cos.f64 lambda1)
(sin.f64 lambda2)
(sin.f64 (+.f64 lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda1 lambda2)
(+.f64 lambda2 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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

localize667.0ms (3.2%)

Memory
15.5MiB live, 759.8MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy15.50158425923313
(sin.f64 (+.f64 lambda1 lambda2))
accuracy17.495312141909693
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))
accuracy30.29791918749511
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
accuracy32.82103623144109
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2))))
accuracy15.236328688547452
(sin.f64 (-.f64 lambda1 lambda2))
accuracy15.263402233165403
(cos.f64 (-.f64 lambda1 lambda2))
accuracy15.50158425923313
(sin.f64 (+.f64 lambda2 lambda1))
accuracy27.446042056322963
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
accuracy15.263402233165403
(cos.f64 (-.f64 lambda1 lambda2))
accuracy30.29791918749511
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
accuracy30.43244814504457
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
accuracy30.706344896283564
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
accuracy15.263402233165403
(cos.f64 (-.f64 lambda1 lambda2))
accuracy30.29791918749511
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
accuracy32.82103623144109
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
accuracy33.926480678255366
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
accuracy0.140625
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
accuracy0.16796875
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
accuracy0.19140625
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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.5522893933177478
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
Samples
461.0ms224×1valid
96.0ms31×2valid
1.0ms1×0valid
Compiler

Compiled 738 to 73 computations (90.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 467.0ms
ival-cos: 143.0ms (30.6% of total)
ival-sin: 111.0ms (23.8% of total)
ival-mult: 63.0ms (13.5% of total)
adjust: 53.0ms (11.4% of total)
ival-add: 48.0ms (10.3% of total)
ival-atan2: 27.0ms (5.8% of total)
ival-sub: 9.0ms (1.9% of total)
ival-pow2: 5.0ms (1.1% of total)
ival-div: 5.0ms (1.1% of total)
ival-neg: 2.0ms (0.4% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series183.0ms (0.9%)

Memory
-20.9MiB live, 167.5MiB allocated
Counts
31 → 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 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())
#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())
#s(alt (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())
#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())
#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())
Outputs
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))) (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))) (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))) (* 1/2 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))) (taylor 0 lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (+ (* -1/2 (sin (- phi2 lambda2))) (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2))))))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (* (cos phi2) (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2)))))) (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi2) (+ (* -1/2 (* (cos lambda2) (sin (neg lambda2)))) (+ (* -1/2 (* (cos (neg lambda2)) (sin lambda2))) (+ (* -1/6 (* (cos lambda2) (sin (neg lambda2)))) (* -1/6 (* (cos (neg lambda2)) (sin lambda2)))))))) (* (cos phi2) (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2))))))) (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (* 2 lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1/2 (+ (* -1/3 (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))))) (* 1/2 (cos (* 2 lambda2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1/2 (+ (* 1/2 (cos (* 2 lambda2))) (* (pow lambda1 2) (+ (* -1/3 (+ 1/2 (* 1/2 (cos (* 2 lambda2))))) (* 2/45 (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (* 2 lambda2))))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1/2 (+ (* 1/2 (cos (* 2 lambda2))) (* (pow lambda1 2) (+ (* -1/3 (+ 1/2 (* 1/2 (cos (* 2 lambda2))))) (* (pow lambda1 2) (+ (* -1/315 (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))))) (* 2/45 (+ 1/2 (* 1/2 (cos (* 2 lambda2)))))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1 (* -1/3 (pow lambda1 2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1 (* (pow lambda1 2) (- (* 2/45 (pow lambda1 2)) 1/3)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 2/45 (* -1/315 (pow lambda1 2)))) 1/3)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 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 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (cos lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 (sin (- phi2 lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- phi2 lambda2)) (* lambda1 (cos (- phi2 lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* -1/2 (* lambda1 (sin (- phi2 lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (- phi2 lambda2))) (* -1/6 (* lambda1 (cos (- phi2 lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 phi2))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (* lambda1 (cos (neg (+ lambda2 phi2))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* -1/2 (* lambda1 (sin (neg (+ lambda2 phi2)))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/6 (* lambda1 (cos (neg (+ lambda2 phi2)))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin lambda2) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (cos lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda2) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (cos lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))) (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))) (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))))) (taylor 0 lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))))))) (taylor 0 lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (+ (* -1/2 (sin (- lambda1 phi2))) (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2))))))))))))) (taylor 0 lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (pow (sin lambda1) 2)) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1))))) (* (cos phi2) (pow (sin lambda1) 2))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2))))) (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))))) (* (cos phi2) (pow (sin lambda1) 2))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi2) (+ (* -1/2 (* (cos lambda1) (sin lambda1))) (+ (* -1/6 (* (cos lambda1) (sin lambda1))) (+ (* 1/6 (* (cos lambda1) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda1)))))))) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2)))))) (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))))) (* (cos phi2) (pow (sin lambda1) 2))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* -1 (* (pow lambda2 2) (- 1/2 (* 1/2 (cos (* 2 lambda1))))))) (* 1/2 (cos (* 2 lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow lambda2 2) (+ (* -1 (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (* 1/3 (* (pow lambda2 2) (- 1/2 (* 1/2 (cos (* 2 lambda1))))))))) (* 1/2 (cos (* 2 lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow lambda2 2) (+ (* -1 (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (* (pow lambda2 2) (+ (* -2/45 (* (pow lambda2 2) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))) (* 1/3 (- 1/2 (* 1/2 (cos (* 2 lambda1)))))))))) (* 1/2 (cos (* 2 lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow lambda2 2))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow lambda2 2) (- (* 1/3 (pow lambda2 2)) 1))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/3 (* -2/45 (pow lambda2 2)))) 1))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 (sin (+ lambda1 phi2)) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (* -1 (* lambda2 (cos (+ lambda1 phi2))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1/2 (* lambda2 (sin (+ lambda1 phi2))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* 1/6 (* lambda2 (cos (+ lambda1 phi2))))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 phi2)) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 phi2)) (* -1 (* lambda2 (cos (- lambda1 phi2))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* -1/2 (* lambda2 (sin (- lambda1 phi2))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (- lambda1 phi2))) (* 1/6 (* lambda2 (cos (- lambda1 phi2))))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* 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 (+ (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 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ 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 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (patch (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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 (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda1 lambda2)) (patch (sin.f64 (+.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1)))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow phi2 2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* 1/2 (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/2 (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2))))))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (sin (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* -1 (* phi2 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1 (sin (- lambda1 lambda2))) (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2))))))))))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))) (* 1/24 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1/2 (* phi2 (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1 (* phi2 (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* -1/2 (* phi2 (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/6 (* phi2 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
43.0ms
lambda1
@inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ lambda1 (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda1 lambda2)) (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2)) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (+ lambda1 lambda2)))
28.0ms
phi2
@-inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ lambda1 (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda1 lambda2)) (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2)) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (+ lambda1 lambda2)))
5.0ms
lambda2
@inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ lambda1 (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda1 lambda2)) (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2)) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (+ lambda1 lambda2)))
5.0ms
lambda1
@-inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ lambda1 (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda1 lambda2)) (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2)) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (+ lambda1 lambda2)))
5.0ms
phi2
@inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ lambda1 (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda1 lambda2)) (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2)) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (+ lambda1 lambda2)))

simplify415.0ms (2%)

Memory
-20.0MiB live, 292.7MiB allocated
Algorithm
1×egg-herbie
Rules
13 430×lower-fma.f64
13 430×lower-fma.f32
5 854×lower-+.f64
5 854×lower-+.f32
5 822×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
082319146
1278218538
2785218497
0829317470
Stop Event
1×iter limit
1×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 (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))))
(+ (* 1/2 (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))) (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))) (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))))))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))) (* 1/2 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (+ (* -1/2 (sin (- phi2 lambda2))) (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))))))))))
(* (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 (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (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 lambda2) (sin (neg lambda2))))
(+ (* lambda1 (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi2) (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2)))))) (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi2) (+ (* -1/2 (* (cos lambda2) (sin (neg lambda2)))) (+ (* -1/2 (* (cos (neg lambda2)) (sin lambda2))) (+ (* -1/6 (* (cos lambda2) (sin (neg lambda2)))) (* -1/6 (* (cos (neg lambda2)) (sin lambda2)))))))) (* (cos phi2) (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2))))))) (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))))
(* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))))
(* (pow lambda1 2) (+ 1/2 (+ (* -1/3 (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))))) (* 1/2 (cos (* 2 lambda2))))))
(* (pow lambda1 2) (+ 1/2 (+ (* 1/2 (cos (* 2 lambda2))) (* (pow lambda1 2) (+ (* -1/3 (+ 1/2 (* 1/2 (cos (* 2 lambda2))))) (* 2/45 (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))))))))))
(* (pow lambda1 2) (+ 1/2 (+ (* 1/2 (cos (* 2 lambda2))) (* (pow lambda1 2) (+ (* -1/3 (+ 1/2 (* 1/2 (cos (* 2 lambda2))))) (* (pow lambda1 2) (+ (* -1/315 (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))))) (* 2/45 (+ 1/2 (* 1/2 (cos (* 2 lambda2))))))))))))
(pow lambda1 2)
(* (pow lambda1 2) (+ 1 (* -1/3 (pow lambda1 2))))
(* (pow lambda1 2) (+ 1 (* (pow lambda1 2) (- (* 2/45 (pow lambda1 2)) 1/3))))
(* (pow lambda1 2) (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 2/45 (* -1/315 (pow lambda1 2)))) 1/3))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ (cos 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))))))))
(+ (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 (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 (- phi2 lambda2))
(+ (sin (- phi2 lambda2)) (* lambda1 (cos (- phi2 lambda2))))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* -1/2 (* lambda1 (sin (- phi2 lambda2)))))))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (- phi2 lambda2))) (* -1/6 (* lambda1 (cos (- phi2 lambda2)))))))))
(sin (neg (+ lambda2 phi2)))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (cos (neg (+ lambda2 phi2)))))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* -1/2 (* lambda1 (sin (neg (+ lambda2 phi2))))))))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/6 (* lambda1 (cos (neg (+ lambda2 phi2))))))))))
(+ (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 lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2))))))))
(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 phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(* (cos 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 (- 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)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(- 1/2 (* 1/2 (cos (* 2 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)))
(+ (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))
(+ (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 (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 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))))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(* (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 (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)))) (sin (- lambda2 (* -1 lambda1)))))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(+ (cos 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))
(+ (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 (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(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 phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))))
(+ (* 1/2 (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))) (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))) (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))))))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (+ (* -1/2 (sin (- lambda1 phi2))) (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))))))))))
(* (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) (pow (sin lambda1) 2))
(+ (* lambda2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1))))) (* (cos phi2) (pow (sin lambda1) 2)))
(+ (* lambda2 (+ (* lambda2 (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2))))) (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))))) (* (cos phi2) (pow (sin lambda1) 2)))
(+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi2) (+ (* -1/2 (* (cos lambda1) (sin lambda1))) (+ (* -1/6 (* (cos lambda1) (sin lambda1))) (+ (* 1/6 (* (cos lambda1) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda1)))))))) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2)))))) (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))))) (* (cos phi2) (pow (sin lambda1) 2)))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(- (+ 1/2 (* -1 (* (pow lambda2 2) (- 1/2 (* 1/2 (cos (* 2 lambda1))))))) (* 1/2 (cos (* 2 lambda1))))
(- (+ 1/2 (* (pow lambda2 2) (+ (* -1 (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (* 1/3 (* (pow lambda2 2) (- 1/2 (* 1/2 (cos (* 2 lambda1))))))))) (* 1/2 (cos (* 2 lambda1))))
(- (+ 1/2 (* (pow lambda2 2) (+ (* -1 (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (* (pow lambda2 2) (+ (* -2/45 (* (pow lambda2 2) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))) (* 1/3 (- 1/2 (* 1/2 (cos (* 2 lambda1)))))))))) (* 1/2 (cos (* 2 lambda1))))
1
(+ 1 (* -1 (pow lambda2 2)))
(+ 1 (* (pow lambda2 2) (- (* 1/3 (pow lambda2 2)) 1)))
(+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/3 (* -2/45 (pow lambda2 2)))) 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))))))
(+ (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)))))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(cos lambda1)
(+ (cos 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 phi2))
(+ (sin (+ lambda1 phi2)) (* -1 (* lambda2 (cos (+ lambda1 phi2)))))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1/2 (* lambda2 (sin (+ lambda1 phi2)))))))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* 1/6 (* lambda2 (cos (+ lambda1 phi2)))))))))
(sin (- lambda1 phi2))
(+ (sin (- lambda1 phi2)) (* -1 (* lambda2 (cos (- lambda1 phi2)))))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* -1/2 (* lambda2 (sin (- lambda1 phi2)))))))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (- lambda1 phi2))) (* 1/6 (* lambda2 (cos (- lambda1 phi2)))))))))
(+ (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) (* lambda2 (cos lambda1)))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1))))))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -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 phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* lambda2 (cos lambda1)))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ (cos 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))
(+ (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 (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 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))))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(* (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 (+ 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))) (sin (- lambda1 (* -1 lambda2)))))
(* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))))
(* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))))
(* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ (cos 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))
(+ (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 (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(+ (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)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
1
(+ 1 (* -1/2 (pow phi2 2)))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* 1/2 (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/2 (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(* 2 (sin (- lambda1 lambda2)))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* -1 (* phi2 (sin (- lambda1 lambda2))))))))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1 (sin (- lambda1 lambda2))) (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(+ (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))))))
(+ (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))) (* 1/24 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ (cos 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)))))))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* phi2 (cos (- lambda1 lambda2))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1 (* phi2 (cos (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(+ (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)))))))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ (cos 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))))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 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))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ (cos 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))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (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))))))
(+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
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 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) (sin.f64 lambda2)) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1)) (*.f64 (neg.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)) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2))) lambda1 (neg.f64 (sin.f64 lambda2)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))) (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2))) (sin.f64 (+.f64 lambda2 phi2))))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))) (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))))))
(fma.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (+.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))) (cos.f64 (-.f64 lambda2 phi2))) (cos.f64 (+.f64 lambda2 phi2))) (*.f64 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))) (* 1/2 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 lambda1 #s(literal -1/6 binary64)) (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 lambda2 phi2))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))))) (*.f64 (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 lambda2 phi2))) #s(literal 1/2 binary64))) lambda1 (*.f64 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))) #s(literal 1/2 binary64)))
(+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))
(-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2)))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))))
(-.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2))) (sin.f64 (+.f64 lambda2 phi2)))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(-.f64 (fma.f64 (+.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))) (cos.f64 (-.f64 lambda2 phi2))) (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2))) (sin.f64 (+.f64 lambda2 phi2)))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (+ (* -1/2 (sin (- phi2 lambda2))) (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/6 binary64)) (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 lambda2 phi2))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))))) lambda1 (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 lambda2 phi2)))) lambda1 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))))
(* (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 (neg.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)) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (* (sin lambda2) (sin (neg lambda2))))
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2))) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi2) (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2)))))) (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi2))) lambda1 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi2) (+ (* -1/2 (* (cos lambda2) (sin (neg lambda2)))) (+ (* -1/2 (* (cos (neg lambda2)) (sin lambda2))) (+ (* -1/6 (* (cos lambda2) (sin (neg lambda2)))) (* -1/6 (* (cos (neg lambda2)) (sin lambda2)))))))) (* (cos phi2) (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2))))))) (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (*.f64 lambda1 (cos.f64 phi2)) lambda1) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2))) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi2)))) lambda1 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 phi2)))
(* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ 1/2 (+ (* -1/3 (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))))) (* 1/2 (cos (* 2 lambda2))))))
(*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/6 binary64)) (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) lambda1) lambda1)
(* (pow lambda1 2) (+ 1/2 (+ (* 1/2 (cos (* 2 lambda2))) (* (pow lambda1 2) (+ (* -1/3 (+ 1/2 (* 1/2 (cos (* 2 lambda2))))) (* 2/45 (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))))))))))
(*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 2/45 binary64) (*.f64 lambda1 lambda1) #s(literal -1/3 binary64))) (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ 1/2 (+ (* 1/2 (cos (* 2 lambda2))) (* (pow lambda1 2) (+ (* -1/3 (+ 1/2 (* 1/2 (cos (* 2 lambda2))))) (* (pow lambda1 2) (+ (* -1/315 (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (* 2 lambda2)))))) (* 2/45 (+ 1/2 (* 1/2 (cos (* 2 lambda2))))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/315 binary64) (*.f64 lambda1 lambda1) #s(literal 2/45 binary64))) (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 lambda1 lambda1))
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(* (pow lambda1 2) (+ 1 (* -1/3 (pow lambda1 2))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1) lambda1)
(* (pow lambda1 2) (+ 1 (* (pow lambda1 2) (- (* 2/45 (pow lambda1 2)) 1/3))))
(*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 lambda1 lambda1) #s(literal -1/3 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1) lambda1)
(* (pow lambda1 2) (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 2/45 (* -1/315 (pow lambda1 2)))) 1/3))))
(*.f64 (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 lambda1 lambda1) #s(literal 2/45 binary64)) (*.f64 lambda1 lambda1) #s(literal -1/3 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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)
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(* lambda1 (cos lambda2))
(*.f64 (cos.f64 lambda2) lambda1)
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (cos.f64 lambda2)) lambda1)
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1)) (*.f64 lambda1 lambda1))) lambda1)
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(cos (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))
(sin (- phi2 lambda2))
(sin.f64 (-.f64 phi2 lambda2))
(+ (sin (- phi2 lambda2)) (* lambda1 (cos (- phi2 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* -1/2 (* lambda1 (sin (- phi2 lambda2)))))))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (sin.f64 (-.f64 phi2 lambda2)) (cos.f64 (-.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (- phi2 lambda2))) (* -1/6 (* lambda1 (cos (- phi2 lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/6 binary64)) (cos.f64 (-.f64 lambda2 phi2)) (*.f64 (sin.f64 (-.f64 phi2 lambda2)) #s(literal -1/2 binary64))) lambda1 (cos.f64 (-.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(sin (neg (+ lambda2 phi2)))
(sin.f64 (-.f64 (neg.f64 lambda2) phi2))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (cos (neg (+ lambda2 phi2)))))
(fma.f64 (cos.f64 (+.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* -1/2 (* lambda1 (sin (neg (+ lambda2 phi2))))))))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (sin.f64 (-.f64 (neg.f64 lambda2) phi2)) (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/6 (* lambda1 (cos (neg (+ lambda2 phi2))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/6 binary64)) (cos.f64 (+.f64 lambda2 phi2)) (*.f64 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)) #s(literal -1/2 binary64))) lambda1 (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(sin lambda2)
(sin.f64 lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(fma.f64 (cos.f64 lambda2) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2))))))))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (sin.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2))) lambda1 (neg.f64 (sin.f64 lambda2)))
(* (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 (neg.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)) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(sin lambda2)
(sin.f64 lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(fma.f64 (cos.f64 lambda2) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2))))))))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (sin.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 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 (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(+ (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))
(+ (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))
(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 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(+ (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))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (+ lambda1 lambda2))
(sin.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 phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 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)
(* -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 (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(* (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 (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(+ (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))
(+ (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))
(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 (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(+ (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))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (- lambda2 (* -1 lambda1)))
(sin.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 phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda2 lambda1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (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/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 #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/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1)))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 lambda1)) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))) (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (fma.f64 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2))) lambda2 (sin.f64 (-.f64 lambda1 phi2))) (sin.f64 (+.f64 lambda1 phi2))))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))) (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2)))) lambda2 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 phi2)) (cos.f64 (-.f64 lambda1 phi2))))) lambda2 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (fma.f64 (*.f64 lambda2 #s(literal 1/6 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 phi2)) (cos.f64 (-.f64 lambda1 phi2))) (*.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))))) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 phi2)) (cos.f64 (-.f64 lambda1 phi2))))) lambda2 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64)))
(+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))
(+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))))
(+.f64 (fma.f64 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2))) lambda2 (sin.f64 (-.f64 lambda1 phi2))) (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (+ (* -1/2 (sin (- lambda1 phi2))) (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 #s(literal 1/6 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 phi2)) (cos.f64 (-.f64 lambda1 phi2))) (*.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))))) lambda2 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))))
(* (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/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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) (pow (sin lambda1) 2))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2))
(+ (* lambda2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1))))) (* (cos phi2) (pow (sin lambda1) 2)))
(fma.f64 (*.f64 lambda2 #s(literal 0 binary64)) (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2)))
(+ (* lambda2 (+ (* lambda2 (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2))))) (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))))) (* (cos phi2) (pow (sin lambda1) 2)))
(fma.f64 (fma.f64 #s(literal 0 binary64) (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 phi2)) lambda2)) lambda2 (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2)))
(+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi2) (+ (* -1/2 (* (cos lambda1) (sin lambda1))) (+ (* -1/6 (* (cos lambda1) (sin lambda1))) (+ (* 1/6 (* (cos lambda1) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda1)))))))) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2)))))) (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))))) (* (cos phi2) (pow (sin lambda1) 2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (sin.f64 lambda1))) (neg.f64 (cos.f64 phi2))) lambda2 (*.f64 #s(literal 0 binary64) (cos.f64 phi2))) lambda2 (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2)))
(- 1/2 (* 1/2 (cos (* 2 lambda1))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64)))
(- (+ 1/2 (* -1 (* (pow lambda2 2) (- 1/2 (* 1/2 (cos (* 2 lambda1))))))) (* 1/2 (cos (* 2 lambda1))))
(fma.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* (pow lambda2 2) (+ (* -1 (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (* 1/3 (* (pow lambda2 2) (- 1/2 (* 1/2 (cos (* 2 lambda1))))))))) (* 1/2 (cos (* 2 lambda1))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 lambda2 lambda2) #s(literal 1/3 binary64) #s(literal -1 binary64))) (*.f64 lambda2 lambda2) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* (pow lambda2 2) (+ (* -1 (- 1/2 (* 1/2 (cos (* 2 lambda1))))) (* (pow lambda2 2) (+ (* -2/45 (* (pow lambda2 2) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))) (* 1/3 (- 1/2 (* 1/2 (cos (* 2 lambda1)))))))))) (* 1/2 (cos (* 2 lambda1))))
(fma.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -2/45 binary64) (*.f64 lambda2 lambda2) #s(literal 1/3 binary64))) (*.f64 lambda2 lambda2) (-.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal -1/2 binary64)))) (*.f64 lambda2 lambda2) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow lambda2 2)))
(fma.f64 (neg.f64 lambda2) lambda2 #s(literal 1 binary64))
(+ 1 (* (pow lambda2 2) (- (* 1/3 (pow lambda2 2)) 1)))
(fma.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal 1/3 binary64) #s(literal -1 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64))
(+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/3 (* -2/45 (pow lambda2 2)))) 1)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 lambda2 lambda2) #s(literal 1/3 binary64)) (*.f64 lambda2 lambda2) #s(literal -1 binary64)) (*.f64 lambda2 lambda2) #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)
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64))) (*.f64 lambda2 lambda2)) (*.f64 lambda2 lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(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))
(sin (+ lambda1 phi2))
(sin.f64 (+.f64 lambda1 phi2))
(+ (sin (+ lambda1 phi2)) (* -1 (* lambda2 (cos (+ lambda1 phi2)))))
(fma.f64 (cos.f64 (+.f64 lambda1 phi2)) (neg.f64 lambda2) (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1/2 (* lambda2 (sin (+ lambda1 phi2)))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 (+.f64 lambda1 phi2)) (neg.f64 (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* 1/6 (* lambda2 (cos (+ lambda1 phi2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 #s(literal 1/6 binary64)) (cos.f64 (+.f64 lambda1 phi2)) (*.f64 (sin.f64 (+.f64 lambda1 phi2)) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (sin.f64 (+.f64 lambda1 phi2)))
(sin (- lambda1 phi2))
(sin.f64 (-.f64 lambda1 phi2))
(+ (sin (- lambda1 phi2)) (* -1 (* lambda2 (cos (- lambda1 phi2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 phi2)) (neg.f64 lambda2) (sin.f64 (-.f64 lambda1 phi2)))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* -1/2 (* lambda2 (sin (- lambda1 phi2)))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 phi2)) (neg.f64 (cos.f64 (-.f64 lambda1 phi2)))) lambda2 (sin.f64 (-.f64 lambda1 phi2)))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (- lambda1 phi2))) (* 1/6 (* lambda2 (cos (- lambda1 phi2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 #s(literal 1/6 binary64)) (cos.f64 (-.f64 lambda1 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 phi2)) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 (-.f64 lambda1 phi2)))) lambda2 (sin.f64 (-.f64 lambda1 phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* lambda2 (cos lambda1)))
(fma.f64 lambda2 (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 lambda2 (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1)))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 lambda1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1)))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 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 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/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* lambda2 (cos lambda1)))
(fma.f64 lambda2 (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 lambda2 (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1)))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 lambda1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 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)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ (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))
(+ (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))
(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 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(+ (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))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (+ lambda1 lambda2))
(sin.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 phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda2 lambda1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(* (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 (+ 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))) (sin (- lambda1 (* -1 lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (+ 1/2 (* 1/2 (cos (* 2 lambda2)))) (- 1/2 (* 1/2 (cos (* 2 lambda1)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 lambda2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 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)
(+ (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))
(+ (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))
(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 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(+ (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))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (- lambda1 (* -1 lambda2)))
(sin.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 phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (* -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 (- 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 (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 (*.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 phi2 phi2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* 1/2 (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))))
(fma.f64 #s(literal 0 binary64) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 0 binary64) phi2))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/2 (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 0 binary64) phi2)) phi2 #s(literal 0 binary64)) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(* 2 (sin (- lambda1 lambda2)))
(*.f64 #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))
(fma.f64 #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 0 binary64) phi2))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* -1 (* phi2 (sin (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) phi2 (*.f64 #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1 (sin (- lambda1 lambda2))) (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 0 binary64) phi2) (sin.f64 (-.f64 lambda1 lambda2))) phi2) phi2 (*.f64 #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(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 (*.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 phi2 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))))
(+ (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))))
(+ (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))) (* 1/24 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 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)
(+ (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 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 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+.f64 (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 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2)) (*.f64 phi2 phi2)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* phi2 (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) phi2 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 phi2 #s(literal -1/6 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) phi2 (cos.f64 (-.f64 lambda2 lambda1))) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1 (* phi2 (cos (- lambda1 lambda2)))))
(fma.f64 (neg.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(fma.f64 (neg.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 phi2 #s(literal 1/6 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) phi2 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1)))) phi2 (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 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+.f64 (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 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2)) (*.f64 phi2 phi2)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.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 (*.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 phi2 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)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 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)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ (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 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))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(+ (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))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 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)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ (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 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))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(+ (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))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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)
(+ 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 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)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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)
(+ (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 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))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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)
(+ (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 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))
(+ (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))

rewrite218.0ms (1.1%)

Memory
37.0MiB live, 255.2MiB allocated
Rules
4 126×lower-*.f32
4 102×lower-*.f64
4 016×lower-fma.f32
4 008×lower-fma.f64
2 542×lower-/.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
084624
0145581
1565490
24088490
08296490
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
31 → 490
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 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 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(cos.f64 (-.f64 lambda1 lambda2))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin.f64 (-.f64 lambda1 lambda2))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2))))
(sin.f64 (+.f64 lambda1 lambda2))
Outputs
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 #s(literal 0 binary64)) (sin.f64 phi2)))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (*.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 phi2)) (*.f64 (sin.f64 #s(literal 0 binary64)) (sin.f64 phi2)))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))
(*.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(/.f64 (*.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)))))) #s(literal 1/2 binary64)) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))))) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)))) (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))))
(fma.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))
(fma.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64))))
(*.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))))))
(*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))
(pow.f64 (/.f64 (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))) (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))
(/.f64 (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))))) (neg.f64 (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))))))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)))))) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))) (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2)))))) (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (fma.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(-.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))
(+.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (cos.f64 phi2) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))))
(pow.f64 (/.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (cos.f64 phi2)) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))))
(neg.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(+.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (cos.f64 phi2)) #s(literal 2 binary64))
(*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (sin.f64 lambda1)) (cos.f64 lambda2))
(*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 lambda2)) (sin.f64 lambda1))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64)))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64))) (fma.f64 (pow.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (pow.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))))
(fma.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))))
(*.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)))))
(*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda2))
(pow.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 lambda2 lambda2))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))))
(fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda2))))) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 lambda2)) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda1))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) #s(literal -1 binary64))
(pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda1))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))))
(fma.f64 (neg.f64 (cos.f64 (+.f64 lambda1 lambda1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 lambda1 lambda1))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) lambda1))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 lambda1)) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64))) (/.f64 #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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (neg.f64 (cos.f64 phi1)))))
(*.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) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (neg.f64 (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(*.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) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))))) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(pow.f64 (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (neg.f64 (cos.f64 phi1))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (neg.f64 (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))))) (*.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 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (neg.f64 (cos.f64 phi1)))))
(/.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)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (neg.f64 (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.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)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))))) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (neg.f64 (cos.f64 phi1))))
(/.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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (neg.f64 (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))))) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (neg.f64 (cos.f64 phi1))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (neg.f64 (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.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) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))))) (*.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 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))
(fma.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (cos.f64 phi1))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64) (cos.f64 phi1))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (cos.f64 phi1))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (neg.f64 (cos.f64 phi1)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (neg.f64 (cos.f64 phi1)))))
(+.f64 (+.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (neg.f64 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))))
(pow.f64 (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (+.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)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))))
(/.f64 (neg.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)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda2)) (cos.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (+.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)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (neg.f64 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))) (/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (sin.f64 (+.f64 phi2 lambda1)) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 phi2 lambda1)) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) phi2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (neg.f64 (-.f64 lambda2 phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 (-.f64 lambda2 phi2)))))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
(-.f64 (*.f64 (sin.f64 (+.f64 phi2 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 (+.f64 phi2 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)))) (*.f64 (cos.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 (-.f64 lambda1 lambda2) phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 phi2))))
(+.f64 (*.f64 (sin.f64 (+.f64 phi2 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 (+.f64 phi2 lambda1)) (neg.f64 (sin.f64 lambda2))))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) phi2))))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (neg.f64 (-.f64 lambda2 phi2)))) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 (-.f64 lambda2 phi2)))))
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (-.f64 (neg.f64 lambda2) phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 (neg.f64 lambda2) phi2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) (neg.f64 phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (neg.f64 phi2)))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (neg.f64 (+.f64 lambda2 phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 (+.f64 lambda2 phi2)))))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (sin.f64 phi2))))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 (-.f64 lambda1 lambda2) phi2)))) (*.f64 (cos.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (-.f64 lambda1 lambda2) phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 (-.f64 lambda1 lambda2) phi2)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 lambda1 lambda2)) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2) (*.f64 phi2 (+.f64 (-.f64 lambda1 lambda2) phi2))))) (cos.f64 (/.f64 (*.f64 (*.f64 phi2 phi2) phi2) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2) (*.f64 phi2 (+.f64 (-.f64 lambda1 lambda2) phi2)))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 lambda1 lambda2)) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2) (*.f64 phi2 (+.f64 (-.f64 lambda1 lambda2) phi2))))) (sin.f64 (/.f64 (*.f64 (*.f64 phi2 phi2) phi2) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2) (*.f64 phi2 (+.f64 (-.f64 lambda1 lambda2) phi2)))))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (neg.f64 phi2)))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 (neg.f64 phi2)))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (+.f64 lambda2 phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (+.f64 lambda2 phi2))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 (neg.f64 lambda2) phi2))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 (neg.f64 lambda2) phi2))))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) (neg.f64 phi2)))) (*.f64 (cos.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (neg.f64 phi2)))))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (neg.f64 (+.f64 lambda2 phi2)))) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 (+.f64 lambda2 phi2)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (sin.f64 phi2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (-.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (exp.f64 (log.f64 (cos.f64 lambda1))) (exp.f64 (log.f64 (sin.f64 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 lambda2))) (exp.f64 (log.f64 (cos.f64 lambda1))) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (pow.f64 (sqrt.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sqrt.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (sqrt.f64 (*.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) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda2 lambda1)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (pow.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (pow.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 6 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64)))))
(*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))))))
(*.f64 (neg.f64 (fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2)))
(pow.f64 (/.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(/.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64))))
(/.f64 (*.f64 (fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (sin.f64 (+.f64 lambda2 lambda1)))) (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 lambda2 lambda1))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64))) (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 6 binary64))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (sin.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 lambda2 lambda1))))
(neg.f64 (/.f64 (fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(fma.f64 (*.f64 (sin.f64 lambda2) #s(literal -1 binary64)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))) (neg.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 lambda2 lambda1))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (neg.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 lambda2 lambda1))))))
(fma.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (neg.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 lambda2 lambda1))))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))))
(-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (sin.f64 (+.f64 lambda2 lambda1)))) (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 lambda2 lambda1)))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (sin.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 lambda2 lambda1))))))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (-.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (exp.f64 (log.f64 (cos.f64 lambda1))) (exp.f64 (log.f64 (sin.f64 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 lambda2))) (exp.f64 (log.f64 (cos.f64 lambda1))) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (pow.f64 (sqrt.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sqrt.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (sqrt.f64 (*.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) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda2 lambda1)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))

eval400.0ms (1.9%)

Memory
13.4MiB live, 569.0MiB allocated
Compiler

Compiled 70 116 to 4 122 computations (94.1% saved)

prune347.0ms (1.7%)

Memory
-15.5MiB live, 550.4MiB allocated
Pruning

76 alts after pruning (75 fresh and 1 done)

PrunedKeptTotal
New1 909301 939
Fresh214566
Picked415
Done000
Total1 934762 010
Accuracy
100.0%
Counts
2 010 → 76
Alt Table
Click to see full alt table
StatusAccuracyProgram
94.4%
(fma.f64 lambda1 (/.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
52.4%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1))
78.2%
(+.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)
94.4%
(+.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
78.3%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (cos.f64 phi2)) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
93.7%
(+.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
78.0%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (sin (+ lambda2 lambda1)) (fma.f64 (cos.f64 lambda2) lambda1 (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)))))
62.6%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (sin (+ lambda2 lambda1)) (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)))))
78.2%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
61.4%
(+.f64 lambda1 (atan2.f64 (/.f64 #s(approx (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2))) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
73.2%
(+.f64 lambda1 (atan2.f64 (/.f64 #s(approx (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 phi2))) (sin.f64 (+.f64 lambda2 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
74.1%
(+.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))))))
94.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
78.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 phi2)) (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)))))
65.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
73.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
73.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
65.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
72.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(approx (sin (+ (- lambda1 lambda2) phi2)) (fma.f64 (cos.f64 (-.f64 phi2 lambda2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
97.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)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
✓99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
80.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
78.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)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
94.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))))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (neg.f64 (cos.f64 phi1)))))))
80.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
98.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (cos.f64 lambda2) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
78.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (pow.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
94.0%
(+.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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
93.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.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))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))))
94.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (fma.f64 #s(approx (cos (* 2 (- lambda1 lambda2))) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
98.2%
(+.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.2%
(+.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.5%
(+.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))))))
87.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ 1 (/ (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))))) (/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))
74.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ 1 (/ (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* (+ (* (cos (* 2 (- lambda1 lambda2))) 1/2) 1/2) (+ (* (cos (+ phi2 phi2)) 1/2) 1/2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))
97.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
81.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 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
81.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))))))
69.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
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))))))
69.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)))))
70.4%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
68.9%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2)))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
65.6%
(+.f64 lambda1 (atan2.f64 #s(approx (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
73.9%
(+.f64 lambda1 (atan2.f64 #s(approx (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
79.9%
(+.f64 lambda1 (atan2.f64 #s(approx (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
66.9%
(+.f64 lambda1 (atan2.f64 #s(approx (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (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)))))
97.9%
(+.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)))))
75.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (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)))))
70.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 lambda2 lambda2)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
73.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
72.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
75.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 3 binary64)) (pow.f64 (cos.f64 phi1) #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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))
75.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 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (/.f64 #s(literal 1 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))))
73.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
75.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
68.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.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
75.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
75.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
68.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
75.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
67.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
75.5%
(+.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))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
60.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
57.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (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))))))
57.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
60.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
60.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
60.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
71.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
98.0%
(*.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)))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
98.1%
#s(approx (+ lambda1 (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
99.7%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
Compiler

Compiled 7 315 to 2 106 computations (71.2% saved)

regimes512.0ms (2.5%)

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

7 calls:

179.0ms
(cos.f64 phi2)
74.0ms
(cos.f64 phi1)
71.0ms
phi1
54.0ms
lambda2
44.0ms
phi2
Results
AccuracySegmentsBranch
99.7%1lambda1
99.7%1lambda2
99.7%1phi1
99.7%1phi2
99.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))))))
99.7%1(cos.f64 phi2)
99.7%1(cos.f64 phi1)
Compiler

Compiled 56 to 40 computations (28.6% saved)

regimes370.0ms (1.8%)

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

7 calls:

72.0ms
(cos.f64 phi2)
69.0ms
lambda2
55.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))))))
54.0ms
(cos.f64 phi1)
39.0ms
phi1
Results
AccuracySegmentsBranch
99.7%1lambda1
99.7%1lambda2
99.7%1phi1
99.7%1phi2
99.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))))))
99.7%1(cos.f64 phi2)
99.7%1(cos.f64 phi1)
Compiler

Compiled 56 to 40 computations (28.6% saved)

regimes275.0ms (1.3%)

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

7 calls:

61.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))))))
37.0ms
lambda2
35.0ms
phi1
34.0ms
phi2
33.0ms
(cos.f64 phi1)
Results
AccuracySegmentsBranch
98.4%1lambda1
98.4%1lambda2
98.4%1phi1
98.4%1phi2
98.4%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.4%1(cos.f64 phi2)
98.4%1(cos.f64 phi1)
Compiler

Compiled 56 to 40 computations (28.6% saved)

regimes588.0ms (2.8%)

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

7 calls:

249.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))))))
73.0ms
lambda2
43.0ms
lambda1
34.0ms
(cos.f64 phi1)
31.0ms
(cos.f64 phi2)
Results
AccuracySegmentsBranch
98.4%1lambda1
98.4%1lambda2
98.4%1phi1
98.4%1phi2
98.4%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.4%1(cos.f64 phi2)
98.4%1(cos.f64 phi1)
Compiler

Compiled 56 to 40 computations (28.6% saved)

regimes633.0ms (3.1%)

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

139.0ms
phi2
133.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))))))
122.0ms
phi1
117.0ms
(cos.f64 phi1)
49.0ms
lambda1
Results
AccuracySegmentsBranch
98.3%1lambda1
98.3%1lambda2
98.3%1phi1
98.3%1phi2
98.3%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.3%1(cos.f64 phi2)
98.3%1(cos.f64 phi1)
Compiler

Compiled 56 to 40 computations (28.6% saved)

regimes310.0ms (1.5%)

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

7 calls:

66.0ms
lambda1
54.0ms
(cos.f64 phi1)
48.0ms
(cos.f64 phi2)
46.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
36.0ms
lambda2
Results
AccuracySegmentsBranch
98.2%1phi1
98.2%1lambda1
98.2%1lambda2
98.2%1phi2
98.2%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.2%1(cos.f64 phi2)
98.2%1(cos.f64 phi1)
Compiler

Compiled 56 to 40 computations (28.6% saved)

regimes157.0ms (0.8%)

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

7 calls:

42.0ms
(cos.f64 phi2)
32.0ms
lambda1
26.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))))))
14.0ms
lambda2
Results
AccuracySegmentsBranch
97.5%1lambda1
97.5%1lambda2
97.5%1phi1
97.5%1phi2
97.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))))))
97.5%1(cos.f64 phi2)
97.5%1(cos.f64 phi1)
Compiler

Compiled 56 to 40 computations (28.6% saved)

regimes130.0ms (0.6%)

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

38.0ms
phi1
21.0ms
(cos.f64 phi1)
17.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))))))
13.0ms
lambda2
13.0ms
phi2
Results
AccuracySegmentsBranch
97.5%1lambda1
97.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))))))
97.5%1(cos.f64 phi2)
97.5%1(cos.f64 phi1)
97.5%1lambda2
97.5%1phi1
97.5%1phi2
Compiler

Compiled 56 to 40 computations (28.6% saved)

regimes199.0ms (1%)

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

7 calls:

42.0ms
phi2
37.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))))))
28.0ms
phi1
19.0ms
(cos.f64 phi1)
13.0ms
lambda1
Results
AccuracySegmentsBranch
82.4%1lambda1
91.4%2phi1
92.6%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))))))
89.7%2(cos.f64 phi2)
91.4%2(cos.f64 phi1)
91.4%3lambda2
89.7%2phi2
Compiler

Compiled 56 to 40 computations (28.6% saved)

regimes43.0ms (0.2%)

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

2 calls:

29.0ms
phi1
12.0ms
(cos.f64 phi1)
Results
AccuracySegmentsBranch
91.1%2phi1
91.1%2(cos.f64 phi1)
Compiler

Compiled 11 to 9 computations (18.2% saved)

regimes32.0ms (0.2%)

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

21.0ms
phi1
9.0ms
(cos.f64 phi1)
Results
AccuracySegmentsBranch
91.0%2phi1
91.0%2(cos.f64 phi1)
Compiler

Compiled 11 to 9 computations (18.2% saved)

regimes63.0ms (0.3%)

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

6 calls:

12.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))))))
11.0ms
phi1
10.0ms
(cos.f64 phi2)
9.0ms
lambda2
9.0ms
phi2
Results
AccuracySegmentsBranch
91.7%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))))))
89.3%2phi2
89.3%2(cos.f64 phi2)
90.7%3lambda2
85.1%2phi1
85.0%2(cos.f64 phi1)
Compiler

Compiled 51 to 36 computations (29.4% saved)

regimes77.0ms (0.4%)

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

32.0ms
lambda2
9.0ms
(cos.f64 phi1)
7.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))))))
7.0ms
phi2
7.0ms
lambda1
Results
AccuracySegmentsBranch
75.8%1lambda1
75.8%1(cos.f64 phi1)
75.8%1phi1
75.8%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
75.8%1lambda2
75.8%1phi2
75.8%1(cos.f64 phi2)
Compiler

Compiled 56 to 40 computations (28.6% saved)

regimes26.0ms (0.1%)

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

7 calls:

5.0ms
lambda2
3.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
3.0ms
lambda1
3.0ms
phi2
3.0ms
phi1
Results
AccuracySegmentsBranch
75.5%1lambda1
75.5%1phi1
75.5%1phi2
75.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))))))
75.5%1(cos.f64 phi2)
75.5%1lambda2
75.5%1(cos.f64 phi1)
Compiler

Compiled 56 to 40 computations (28.6% saved)

regimes17.0ms (0.1%)

Memory
4.4MiB live, 43.3MiB allocated
Counts
4 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
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))))))
2.0ms
lambda2
2.0ms
(cos.f64 phi2)
2.0ms
phi2
Results
AccuracySegmentsBranch
68.2%1lambda1
68.2%1phi1
68.2%1lambda2
68.2%1phi2
68.2%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
68.2%1(cos.f64 phi2)
68.2%1(cos.f64 phi1)
Compiler

Compiled 56 to 40 computations (28.6% saved)

regimes15.0ms (0.1%)

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

7 calls:

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

Compiled 56 to 40 computations (28.6% saved)

regimes13.0ms (0.1%)

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

7 calls:

3.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
2.0ms
lambda2
2.0ms
phi1
2.0ms
phi2
1.0ms
(cos.f64 phi2)
Results
AccuracySegmentsBranch
60.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))))))
60.3%1(cos.f64 phi1)
60.3%1lambda2
60.3%1lambda1
60.3%1phi2
60.3%1phi1
60.3%1(cos.f64 phi2)
Compiler

Compiled 56 to 40 computations (28.6% saved)

regimes10.0ms (0%)

Memory
34.6MiB live, 34.6MiB allocated
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

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

7 calls:

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

Compiled 56 to 40 computations (28.6% saved)

bsearch2.0ms (0%)

Memory
-44.4MiB live, 1.7MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.9992937065822636
0.9997107750663791
Compiler

Compiled 27 to 21 computations (22.2% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.9992937065822636
0.9997107750663791
Compiler

Compiled 27 to 21 computations (22.2% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.9992937065822636
0.9997107750663791
Compiler

Compiled 27 to 21 computations (22.2% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.9999989837518695
0.9999999999999947
Compiler

Compiled 26 to 21 computations (19.2% saved)

simplify12.0ms (0.1%)

Memory
32.4MiB live, 32.4MiB allocated
Algorithm
1×egg-herbie
Rules
60×+-commutative_binary64
34×*-commutative_binary64
10×sub-neg_binary64
6×neg-sub0_binary64
6×neg-mul-1_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0137786
1186786
2194786
3199786
4201786
Stop Event
1×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)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (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))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 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 4501347827556811/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 (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 4501347827556811/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 4501347827556811/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 9007190247541737/9007199254740992 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))))))
(+.f64 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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.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 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (+.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.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)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (cos.f64 lambda2)) 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 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1))) (cos.f64 phi2)) (+.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (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))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 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 4501347827556811/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 (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 4501347827556811/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 (cos.f64 lambda1) (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 phi1) #s(literal 4501347827556811/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 4501347827556811/4503599627370496 binary64)) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (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 phi1) #s(literal 4501347827556811/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 4501347827556811/4503599627370496 binary64)) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))) 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 9007190247541737/9007199254740992 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 9007190247541737/9007199254740992 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))
(+.f64 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 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) lambda1)

soundness1.6s (7.9%)

Memory
-25.8MiB live, 1 046.5MiB allocated
Rules
14 730×lower-fma.f64
14 730×lower-fma.f32
13 430×lower-fma.f64
13 430×lower-fma.f32
10 432×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0115924502
1385223923
0886222337
02303176
16833129
219003074
337623074
085052880
062453
0115416
1418367
23489367
08367357
0120228025
1392627599
0848226186
082319146
1278218538
2785218497
0829317470
01463
02463
18263
257463
3689963
0844260
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×iter limit
1×node limit
1×iter limit
1×node limit
Compiler

Compiled 1 673 to 738 computations (55.9% saved)

preprocess217.0ms (1%)

Memory
27.7MiB live, 226.2MiB allocated
Remove

(abs phi1)

(abs phi2)

Compiler

Compiled 3 250 to 1 424 computations (56.2% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...