Bearing on a great circle

Time bar (total: 26.4s)

start0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

analyze882.0ms (3.3%)

Memory
-1.8MiB live, 948.9MiB allocated
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
0%0%99.8%0.2%0%0%0%1
0%0%99.8%0.2%0%0%0%2
0%0%99.8%0.2%0%0%0%3
0%0%99.8%0.2%0%0%0%4
0%0%99.8%0.2%0%0%0%5
0%0%99.8%0.2%0%0%0%6
0%0%99.8%0.2%0%0%0%7
0%0%99.8%0.2%0%0%0%8
7.8%7.8%92%0.2%0%0%0%9
7.8%7.8%92%0.2%0%0%0%10
10.2%10.1%89.7%0.2%0%0%0%11
10.2%10.1%89.7%0.2%0%0%0%12
Compiler

Compiled 26 to 19 computations (26.9% saved)

sample7.4s (28%)

Memory
153.5MiB live, 5 784.0MiB allocated
Samples
6.3s5 959×1valid
509.0ms2 297×0valid
Precisions
Click to see histograms. Total time spent on operations: 6.1s
ival-sin: 2.5s (40.5% of total)
ival-cos: 2.3s (36.7% of total)
adjust: 506.0ms (8.2% of total)
ival-mult: 442.0ms (7.2% of total)
ival-sub: 295.0ms (4.8% of total)
ival-atan2: 149.0ms (2.4% of total)
ival-true: 6.0ms (0.1% of total)
ival-assert: 3.0ms (0% of total)
Bogosity

explain649.0ms (2.5%)

Memory
-45.4MiB live, 583.7MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
68119(-3.066244655499962e-141 1.0607774388911024e+212 4.500919363947793e-300 -5.462589927970275e-218)0-(sin.f64 (-.f64 lambda1 lambda2))
68119(-3.066244655499962e-141 1.0607774388911024e+212 4.500919363947793e-300 -5.462589927970275e-218)0-(cos.f64 (-.f64 lambda1 lambda2))
00-0-(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
00-0-(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
00-0-lambda2
00-0-phi2
00-0-(*.f64 (sin.f64 phi1) (cos.f64 phi2))
00-0-(-.f64 lambda1 lambda2)
00-0-(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
00-0-(sin.f64 phi1)
00-0-(cos.f64 phi2)
00-0-lambda1
00-0-phi1
00-0-(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
00-0-(sin.f64 phi2)
00-0-(*.f64 (cos.f64 phi1) (sin.f64 phi2))
00-0-(cos.f64 phi1)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (-.f64 lambda1 lambda2))sensitivity1870
sin.f64(sin.f64 (-.f64 lambda1 lambda2))sensitivity1870
Confusion
Predicted +Predicted -
+610
-12669
Precision
0.32620320855614976
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+6100
-126069
Precision?
0.32620320855614976
Recall?
1.0
Freqs
test
numberfreq
069
2187
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
400.0ms370×1valid
34.0ms142×0valid
Compiler

Compiled 208 to 55 computations (73.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 395.0ms
ival-sin: 193.0ms (48.9% of total)
ival-cos: 125.0ms (31.7% of total)
ival-mult: 31.0ms (7.9% of total)
adjust: 26.0ms (6.6% of total)
ival-sub: 10.0ms (2.5% of total)
ival-atan2: 9.0ms (2.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess196.0ms (0.7%)

Memory
-0.7MiB live, 144.4MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0104352
1246350
2545350
31296350
42873350
56275350
01724
03024
15424
29724
321224
445724
5110724
6282124
7605124
0831824
Stop Event
iter limit
node limit
iter limit
node limit
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
Compiler

Compiled 24 to 17 computations (29.2% saved)

eval10.0ms (0%)

Memory
7.0MiB live, 7.0MiB allocated
Compiler

Compiled 0 to 4 computations (-∞% saved)

prune1.0ms (0%)

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

Compiled 24 to 17 computations (29.2% saved)

simplify127.0ms (0.5%)

Memory
5.2MiB live, 96.4MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

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

Useful iterations: 0 (0.0ms)

IterNodesCost
01790
03090
15490
29790
321290
445790
5110790
6282190
7605190
0831890
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))

localize242.0ms (0.9%)

Memory
32.5MiB live, 217.5MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.16015625
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
accuracy0.236660009768442
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy14.628299870939717
(cos.f64 (-.f64 lambda1 lambda2))
accuracy14.85225978126673
(sin.f64 (-.f64 lambda1 lambda2))
Samples
216.0ms185×1valid
13.0ms71×0valid
Compiler

Compiled 92 to 19 computations (79.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 210.0ms
ival-cos: 109.0ms (51.9% of total)
ival-sin: 67.0ms (31.9% of total)
adjust: 13.0ms (6.2% of total)
ival-mult: 12.0ms (5.7% of total)
ival-sub: 5.0ms (2.4% of total)
ival-atan2: 5.0ms (2.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series34.0ms (0.1%)

Memory
5.0MiB live, 49.4MiB allocated
Counts
6 → 66
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
Outputs
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(* -1 lambda2)
(- lambda1 lambda2)
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(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 (* -1 lambda2))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(* lambda2 (- (/ lambda1 lambda2) 1))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(* (cos (- lambda1 lambda2)) (sin phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
Calls

12 calls:

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

simplify185.0ms (0.7%)

Memory
-19.1MiB live, 176.4MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02451062
1913987
23716907
08097854
Stop Event
iter limit
node limit
Counts
66 → 65
Calls
Call 1
Inputs
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(* -1 lambda2)
(- lambda1 lambda2)
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(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 (* -1 lambda2))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(* lambda2 (- (/ lambda1 lambda2) 1))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(* (cos (- lambda1 lambda2)) (sin phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
Outputs
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) lambda1) (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 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) 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 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (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 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(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 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1) (neg.f64 (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 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (sin.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) lambda1) (sin.f64 phi1)) (sin.f64 lambda2) (*.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (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))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1)))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))))))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 phi2) lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (fma.f64 lambda2 (*.f64 #s(literal -1/6 binary64) lambda2) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2)))) lambda2 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))))) phi1)
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64)))))
(* (cos (- lambda1 lambda2)) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64)))))

rewrite202.0ms (0.8%)

Memory
22.2MiB live, 121.0MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01752
03052
110152
273852
0820352
Stop Event
iter limit
node limit
iter limit
Counts
6 → 180
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
Outputs
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64))) (*.f64 (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (-.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (neg.f64 phi2)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) lambda1) lambda2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(neg.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal -2 binary64)))
(fma.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) lambda1) lambda2)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) #s(literal 0 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (neg.f64 phi2)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))))
(/.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 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.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 (-.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 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.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)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 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 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.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 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (+.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (fma.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)) (*.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (fma.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (*.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (neg.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (neg.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (neg.f64 (-.f64 lambda1 lambda2)))) (+.f64 lambda2 lambda1))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (pow.f64 lambda2 #s(literal 3 binary64)))) (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (neg.f64 (neg.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (neg.f64 (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))
(-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(-.f64 lambda1 lambda2)
(+.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 (neg.f64 lambda2) lambda2) (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))) (-.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.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 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (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 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (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 (*.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 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (sin.f64 (neg.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(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 (neg.f64 (sin.f64 lambda1))) (sin.f64 lambda2)))
(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 (neg.f64 (sin.f64 lambda1))) (sin.f64 lambda2)))
(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)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.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)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.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 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.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 (neg.f64 (sin.f64 lambda1))) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2))))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2)))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (*.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal -2 binary64)))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal -2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(neg.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))
(fma.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
(+.f64 (*.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))

eval61.0ms (0.2%)

Memory
-8.5MiB live, 37.4MiB allocated
Compiler

Compiled 11 099 to 1 368 computations (87.7% saved)

prune66.0ms (0.3%)

Memory
12.7MiB live, 60.0MiB allocated
Pruning

37 alts after pruning (37 fresh and 0 done)

PrunedKeptTotal
New22437261
Fresh000
Picked101
Done000
Total22537262
Accuracy
89.9%
Counts
262 → 37
Alt Table
Click to see full alt table
StatusAccuracyProgram
15.9%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.7%
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
89.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
70.4%
(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))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
77.5%
(atan2.f64 (*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
74.4%
(atan2.f64 (*.f64 (/.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
76.1%
(atan2.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
28.1%
(atan2.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
54.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))))
53.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
69.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
78.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
78.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))))))))
78.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1))))))
72.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
64.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)))))
64.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
58.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))))))
66.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
70.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
71.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
53.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
52.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
49.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))))) phi1))))
50.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2))))))))
53.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
69.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
65.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
69.8%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
78.7%
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
61.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
58.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
60.4%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.3%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.6%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 2 940 to 1 872 computations (36.3% saved)

simplify123.0ms (0.5%)

Memory
-17.2MiB live, 38.6MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
cost-diff1
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
cost-diff10
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
cost-diff0
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
cost-diff0
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff2
(cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))
cost-diff3
(cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
cost-diff0
(-.f64 lambda1 lambda2)
cost-diff0
(sin.f64 (-.f64 lambda1 lambda2))
cost-diff0
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
cost-diff0
(-.f64 lambda1 lambda2)
cost-diff0
(sin.f64 (-.f64 lambda1 lambda2))
cost-diff0
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff0
(sin.f64 lambda1)
cost-diff0
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
cost-diff0
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
068753
0124753
1217753
2434711
31106711
42982703
08410701
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(cos.f64 lambda2)
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))
(-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)
(-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
lambda1
(+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))
lambda2
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
phi2
(cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
(-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))
(+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))
(sin.f64 (+.f64 phi1 phi2))
(+.f64 phi1 phi2)
(sin.f64 (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(cos.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
(*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))
#s(literal 2 binary64)
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(fma.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
(*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(cos.f64 lambda2)
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 phi2 #s(literal 0 binary64))) lambda2)) (neg.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 phi2 #s(literal 0 binary64))) lambda2)) (neg.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal 2 binary64))
(-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(-.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 phi2 #s(literal 0 binary64))) lambda2)) (neg.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))
(cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))
(sin.f64 (-.f64 (-.f64 lambda1 (-.f64 phi2 #s(literal 0 binary64))) lambda2))
(-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)
(-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)
(-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))
lambda1
(+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)
lambda2
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
phi2
(cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
(neg.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))
(-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))
(*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (cos.f64 (-.f64 lambda2 lambda1)))
(+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))
(+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))
(sin.f64 (+.f64 phi1 phi2))
(+.f64 phi1 phi2)
(sin.f64 (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(cos.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
(*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))
#s(literal 2 binary64)

localize985.0ms (3.7%)

Memory
-18.4MiB live, 650.8MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy14.628299870939717
(cos.f64 (-.f64 lambda2 lambda1))
accuracy14.85225978126673
(sin.f64 (-.f64 lambda1 lambda2))
accuracy14.85582626264775
(cos.f64 (+.f64 lambda2 lambda1))
accuracy24.49287844731077
(+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))
accuracy9.983702163249985
(-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
accuracy14.628299870939717
(cos.f64 (-.f64 lambda1 lambda2))
accuracy55.887203509719996
(cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
accuracy56.09345683439284
(cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))
accuracy0.16015625
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
accuracy0.236660009768442
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
accuracy14.85225978126673
(sin.f64 (-.f64 lambda1 lambda2))
accuracy28.94380346659404
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
accuracy0.18359375
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy14.628299870939717
(cos.f64 (-.f64 lambda1 lambda2))
accuracy14.85225978126673
(sin.f64 (-.f64 lambda1 lambda2))
accuracy26.030631885027816
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy0.15070045288117193
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
accuracy0.16015625
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2))
accuracy0.236660009768442
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy14.628299870939717
(cos.f64 (-.f64 lambda1 lambda2))
Samples
887.0ms254×1valid
1.0ms0valid
Compiler

Compiled 722 to 59 computations (91.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 809.0ms
ival-cos: 319.0ms (39.4% of total)
ival-sin: 254.0ms (31.4% of total)
adjust: 107.0ms (13.2% of total)
ival-mult: 59.0ms (7.3% of total)
ival-sub: 22.0ms (2.7% of total)
ival-atan2: 20.0ms (2.5% of total)
ival-add: 14.0ms (1.7% of total)
ival-div: 9.0ms (1.1% of total)
ival-neg: 2.0ms (0.2% of total)
ival-pi: 2.0ms (0.2% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series139.0ms (0.5%)

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

12 calls:

TimeVariablePointExpression
40.0ms
phi2
@inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (+ lambda2 lambda1)) (cos (- lambda2 lambda1)))
20.0ms
phi1
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (+ lambda2 lambda1)) (cos (- lambda2 lambda1)))
16.0ms
lambda1
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (+ lambda2 lambda1)) (cos (- lambda2 lambda1)))
14.0ms
lambda2
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (+ lambda2 lambda1)) (cos (- lambda2 lambda1)))
8.0ms
lambda1
@0
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (+ lambda2 lambda1)) (cos (- lambda2 lambda1)))

simplify1.3s (4.8%)

Memory
-15.4MiB live, 287.6MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
09426024
134985749
085565289
Stop Event
iter limit
node limit
Counts
245 → 244
Calls
Call 1
Inputs
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(* -1 (sin lambda2))
(+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2)))))))
lambda1
(* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(* -1 lambda2)
(- lambda1 lambda2)
(cos (- (+ phi2 (* 1/2 (PI))) lambda2))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))) (* 1/6 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1 (* lambda1 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(atan2 (* 1/2 (- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))
(+ (* 1/2 (* lambda1 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(+ (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (* 1/2 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))))
(+ (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (* lambda1 (+ (* 1/2 (* lambda1 (- (* -1/6 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (* 1/2 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))))))))
(* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))
(+ (* 1/2 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(+ (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* lambda1 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))))
(+ (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* lambda1 (+ (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* -1/12 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* -1/2 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda1 (- (* 1/4 (* lambda1 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(* (cos (neg lambda2)) (sin phi1))
(+ (* -1 (* lambda1 (* (sin phi1) (sin (neg lambda2))))) (* (cos (neg lambda2)) (sin phi1)))
(+ (* lambda1 (+ (* -1 (* (sin phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin phi1)))))) (* (cos (neg lambda2)) (sin phi1)))
(+ (* lambda1 (+ (* -1 (* (sin phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin phi1))) (* 1/6 (* lambda1 (* (sin phi1) (sin (neg lambda2))))))))) (* (cos (neg lambda2)) (sin phi1)))
(- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (+ (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* lambda1 (- (* -1/6 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(cos lambda2)
(+ (cos lambda2) (* -1 (* lambda1 (sin lambda2))))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (sin lambda2))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* 1/6 (* lambda1 (sin lambda2))))) (sin lambda2))))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(sin lambda1)
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))
(cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI))))))
(* 1/2 (- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos (- lambda1 lambda2)) (sin phi1))
(- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))
(cos (+ lambda1 lambda2))
(cos (- lambda2 lambda1))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))))
(atan2 (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))))
(* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))
(- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))
(cos (- lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ (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 (* -1 lambda2))
(cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1/2 (* lambda2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))
(cos (- lambda1 (+ phi2 (* 1/2 (PI)))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1/2 (* lambda2 (cos (- lambda1 (+ phi2 (* 1/2 (PI))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))
(* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
(+ (* 1/2 (* lambda2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))
(+ (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))))
(+ (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* lambda2 (+ (* 1/2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* 1/6 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))))))
(* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))
(+ (* -1/2 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(+ (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* -1/4 (* lambda2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))))
(+ (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* 1/12 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* 1/2 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda2 (- (* 1/4 (* lambda2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 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 lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (sin phi1))
(+ (* lambda2 (* (sin lambda1) (sin phi1))) (* (cos lambda1) (sin phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin phi1)))) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (sin phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin phi1))) (* -1/6 (* lambda2 (* (sin lambda1) (sin phi1)))))) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (sin phi1)))
(- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (+ (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (+ (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (+ (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (* 1/6 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(+ (cos lambda1) (* -1 (* lambda2 (sin lambda1))))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (sin lambda1))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* 1/6 (* lambda2 (sin lambda1))))) (sin lambda1))))
(cos (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)))))
(* lambda2 (- (/ lambda1 lambda2) 1))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))
(cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI)))))
(atan2 (* 1/2 (- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* 1/2 (- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))))
(* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))
(- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))
(cos (- lambda1 (* -1 lambda2)))
(cos (neg (+ lambda1 (* -1 lambda2))))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2)))))
(+ (* 1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))) (* phi1 (+ (* 1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2))))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))) (* phi1 (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2))))) (* phi1 (+ (* 1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))))))
(- (sin phi2) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(- (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (* -1/2 (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (+ (* -1/2 (sin phi2)) (* -1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(* phi1 (cos (- lambda1 lambda2)))
(* phi1 (+ (cos (- lambda1 lambda2)) (* -1/6 (* (pow phi1 2) (cos (- lambda1 lambda2))))))
(* phi1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/120 (* (pow phi1 2) (cos (- lambda1 lambda2))))))))
(* phi1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/6 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/120 (cos (- lambda1 lambda2)))))))))
(+ (sin phi2) (sin (neg phi2)))
(+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (cos (neg phi2))))))
(+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (+ (cos (neg phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2))))))))))
(+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (+ (cos (neg phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2)))))))))))))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(cos (- (+ lambda1 (* 1/2 (PI))) lambda2))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* -1/2 (* phi2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (* -1/2 (* phi2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/6 (* phi2 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))
(* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))
(+ (* 1/2 (* phi2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(+ (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* 1/2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))))
(+ (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* phi2 (+ (* 1/2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))
(* (cos (- lambda2 lambda1)) (sin phi1))
(+ (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1)))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda2 lambda1)) (sin phi1)))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(+ (* phi2 (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))) (* phi2 (+ (* -1/2 (* (cos (- lambda2 lambda1)) (sin phi1))) (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1)))))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(* -1 (* (cos (- lambda2 lambda1)) (sin phi1)))
(- (* phi2 (- (cos phi1) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(- (* phi2 (- (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (sin phi1))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(- (* phi2 (- (+ (cos phi1) (* phi2 (- (* phi2 (- (* -1/6 (cos phi1)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1))))))) (* -1/2 (* (cos (- lambda2 lambda1)) (sin phi1)))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (+ (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* phi2 (- (* -1/6 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(* 2 (sin phi1))
(+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (* -1 (cos phi1)))))
(+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (+ (* -1 (cos phi1)) (* -1 (* phi2 (sin phi1)))))))
(+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (+ (* -1 (cos phi1)) (* phi2 (+ (* -1 (sin phi1)) (* phi2 (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1))))))))))
(cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))
(cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI)))))
(atan2 (* 1/2 (- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/2 (- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))))
(+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))
Outputs
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal 1/2 binary64) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
lambda1
(* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda1)
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))
(*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1)
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))
(*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda2)))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(cos (- (+ phi2 (* 1/2 (PI))) lambda2))
(cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(fma.f64 (neg.f64 lambda1) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) lambda1 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))) (* 1/6 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (*.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) #s(literal -1/2 binary64))) lambda1) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) lambda1 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))
(cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))
(cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1 (* lambda1 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (neg.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (*.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) #s(literal -1/2 binary64))) lambda1) (neg.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))
(atan2 (* 1/2 (- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (cos.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1) lambda2))) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))
(*.f64 (-.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda1 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))) lambda1 (-.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))))
(+ (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (* 1/2 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))) lambda1 (-.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))))) lambda1 (*.f64 (-.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (* lambda1 (+ (* 1/2 (* lambda1 (- (* -1/6 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (* 1/2 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))))) lambda1 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))))) lambda1 (*.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))) #s(literal 1/2 binary64))) lambda1 (*.f64 (-.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) #s(literal 1/2 binary64)))
(* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(+ (* 1/2 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))
(+ (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* lambda1 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda1) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda2)) (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (sin.f64 lambda2)) #s(literal 1/2 binary64))) lambda1 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))
(+ (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* lambda1 (+ (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* -1/12 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/12 binary64) lambda1) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))) lambda1 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (sin.f64 lambda2)) #s(literal 1/2 binary64))) lambda1 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda2))))
(- (+ (* -1/2 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (sin.f64 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda2)))))
(- (+ (* lambda1 (- (* 1/4 (* lambda1 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) lambda1) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (sin.f64 lambda2)))) lambda1 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda2)))))
(- (+ (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/12 binary64) lambda1) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (sin.f64 lambda2)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda2)))) lambda1 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (sin.f64 lambda2)))) lambda1 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (sin.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (neg.f64 lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)))) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))) lambda1)) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(* (cos (neg lambda2)) (sin phi1))
(*.f64 (cos.f64 lambda2) (sin.f64 phi1))
(+ (* -1 (* lambda1 (* (sin phi1) (sin (neg lambda2))))) (* (cos (neg lambda2)) (sin phi1)))
(fma.f64 (neg.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (sin phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin phi1)))))) (* (cos (neg lambda2)) (sin phi1)))
(fma.f64 (fma.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))) lambda1 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (sin phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin phi1))) (* 1/6 (* lambda1 (* (sin phi1) (sin (neg lambda2))))))))) (* (cos (neg lambda2)) (sin phi1)))
(fma.f64 (fma.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (sin.f64 phi1))) lambda1)) lambda1 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))
(- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(-.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))) lambda1 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (neg.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (+ (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* lambda1 (- (* -1/6 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))))) lambda1 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))))) lambda1 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (neg.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* -1 (* lambda1 (sin lambda2))))
(fma.f64 (neg.f64 lambda1) (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (sin lambda2))))
(fma.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1)) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* 1/6 (* lambda1 (sin lambda2))))) (sin lambda2))))
(fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda2) lambda1))) lambda1) (sin.f64 lambda2)) lambda1 (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 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (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 #s(literal -1/6 binary64) lambda1) (sin.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (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))
(+ (* -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)))
(sin lambda1)
(sin.f64 lambda1)
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))
(cos.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1) lambda2))
(cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI))))))
(cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))
(* 1/2 (- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (cos.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1) lambda2))) #s(literal 1/2 binary64))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos (- lambda1 lambda2)) (sin phi1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))
(-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (cos.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1) lambda2)))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(* (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))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))
(cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))
(cos.f64 (+.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2) lambda1))
(cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))))
(cos.f64 (+.f64 (fma.f64 #s(literal -1 binary64) lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)) lambda2))
(atan2 (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal -1 binary64) lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)) lambda2)) (cos.f64 (+.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal -1 binary64) lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)) lambda2)) (cos.f64 (+.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))
(-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal -1 binary64) lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)) lambda2)) (cos.f64 (+.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2) lambda1)))
(cos (- lambda2 (* -1 lambda1)))
(cos.f64 (+.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (sin lambda1) (* -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 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))
(cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
(fma.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)) lambda2 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1/2 (* lambda2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1))) lambda2 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)) (*.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)) #s(literal -1/2 binary64))) lambda2 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1))) lambda2 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)))
(cos (- lambda1 (+ phi2 (* 1/2 (PI)))))
(cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))
(fma.f64 (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1/2 (* lambda2 (cos (- lambda1 (+ phi2 (* 1/2 (PI))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) #s(literal -1/2 binary64))) lambda2 (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))))
(* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)) #s(literal -1 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) lambda2 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)))))
(+ (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)))) lambda2 (fma.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)) #s(literal -1 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))))) lambda2 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1))) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* lambda2 (+ (* 1/2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* 1/6 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))))) lambda2 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)))))) lambda2 (*.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)) #s(literal -1 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) #s(literal 1/2 binary64))) lambda2 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1))) #s(literal 1/2 binary64)))
(* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(+ (* -1/2 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda1))))
(+ (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* -1/4 (* lambda2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (*.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda1))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))) lambda2))
(+ (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))) (* 1/12 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/12 binary64) lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))) lambda2 (*.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda1))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))) lambda2 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda1))))
(- (+ (* 1/2 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda1)))))
(- (+ (* lambda2 (- (* 1/4 (* lambda2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda2 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda1)))))
(- (+ (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/12 binary64) lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda1)))) lambda2 (*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda2 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 lambda1)))))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda1))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) lambda2 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda1)))
(* (cos lambda1) (sin phi1))
(*.f64 (cos.f64 lambda1) (sin.f64 phi1))
(+ (* lambda2 (* (sin lambda1) (sin phi1))) (* (cos lambda1) (sin phi1)))
(*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin phi1)))) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (sin phi1)))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))) lambda2 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin phi1))) (* -1/6 (* lambda2 (* (sin lambda1) (sin phi1)))))) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (sin phi1)))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (sin.f64 phi1))) lambda2) lambda2 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))
(- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(-.f64 (fma.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)) #s(literal -1 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (+ (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)))) lambda2 (fma.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)) #s(literal -1 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (+ (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (+ (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (* 1/6 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))))) lambda2 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1))))) lambda2 (fma.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)) #s(literal -1 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)))
(+ (cos lambda1) (* -1 (* lambda2 (sin lambda1))))
(fma.f64 (neg.f64 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (sin lambda1))))
(fma.f64 (-.f64 (*.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))))) (sin lambda1))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(cos (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 (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))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (neg.f64 lambda2))
(cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))
(cos.f64 (+.f64 (fma.f64 #s(literal -1 binary64) lambda2 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)) lambda1))
(cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI)))))
(cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))
(atan2 (* 1/2 (- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (cos.f64 (+.f64 (fma.f64 #s(literal -1 binary64) lambda2 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(* 1/2 (- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (cos.f64 (+.f64 (fma.f64 #s(literal -1 binary64) lambda2 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))
(-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (cos.f64 (+.f64 (fma.f64 #s(literal -1 binary64) lambda2 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)) lambda1)))
(cos (- lambda1 (* -1 lambda2)))
(cos.f64 (+.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2)))
(+ (* 1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))) (* phi1 (+ (* 1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1) (*.f64 #s(literal -1/2 binary64) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) phi1 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))) (* phi1 (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2))))) (* phi1 (+ (* 1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) #s(literal -1/3 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1))) phi1)) phi1 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))))
(- (sin phi2) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(-.f64 (sin.f64 phi2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))))
(- (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (* -1/2 (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) phi1 (-.f64 (sin.f64 phi2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2)))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (+ (* -1/2 (sin phi2)) (* -1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) #s(literal -1/3 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) phi1 (-.f64 (sin.f64 phi2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2)))))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1)
(* phi1 (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1)
(* phi1 (+ (cos (- lambda1 lambda2)) (* -1/6 (* (pow phi1 2) (cos (- lambda1 lambda2))))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1)
(* phi1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/120 (* (pow phi1 2) (cos (- lambda1 lambda2))))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2))) phi1)
(* phi1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/6 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/120 (cos (- lambda1 lambda2)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2))) phi1)
(+ (sin phi2) (sin (neg phi2)))
(+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))
(+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (cos (neg phi2))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi2)) phi1 (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2)))
(+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (+ (cos (neg phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))) phi1 (*.f64 #s(literal 2 binary64) (cos.f64 phi2))) phi1 (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2)))
(+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (+ (cos (neg phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2)))))))))))))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) #s(literal -1/3 binary64)) phi1)) phi1 (*.f64 #s(literal 2 binary64) (cos.f64 phi2))) phi1 (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))
(+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (fma.f64 (neg.f64 (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 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -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 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #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))))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos (- (+ lambda1 (* 1/2 (PI))) lambda2))
(cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(fma.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (neg.f64 phi2) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* -1/2 (* phi2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2))) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2))) phi2 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi2) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (*.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) #s(literal -1/2 binary64))) phi2) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2))) phi2 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))
(cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))
(cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))
(fma.f64 (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (* -1/2 (* phi2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/6 (* phi2 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) #s(literal -1/2 binary64))) phi2 (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
(* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* phi2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) phi2 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
(+ (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* 1/2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))) phi2 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))))) phi2 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* phi2 (+ (* 1/2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/6 binary64) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))) phi2 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))) phi2 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(literal 1/2 binary64))) phi2 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2))) #s(literal 1/2 binary64)))
(* (cos (- lambda2 lambda1)) (sin phi1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(+ (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1)))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda2 lambda1)) (sin phi1)))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) phi2) (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(+ (* phi2 (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))) (* phi2 (+ (* -1/2 (* (cos (- lambda2 lambda1)) (sin phi1))) (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1)))))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))) phi2 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(* -1 (* (cos (- lambda2 lambda1)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(- (* phi2 (- (cos phi1) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(fma.f64 (-.f64 (cos.f64 phi1) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) phi2 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(- (* phi2 (- (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (sin phi1))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(fma.f64 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) phi2) (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) phi2 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(- (* phi2 (- (+ (cos phi1) (* phi2 (- (* phi2 (- (* -1/6 (cos phi1)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1))))))) (* -1/2 (* (cos (- lambda2 lambda1)) (sin phi1)))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) phi2 (-.f64 (cos.f64 phi1) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))) phi2 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))) phi2 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (+ (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* phi2 (- (* -1/6 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))) phi2 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2))))) phi2 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))
(* 2 (sin phi1))
(*.f64 #s(literal 2 binary64) (sin.f64 phi1))
(+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (* -1 (cos phi1)))))
(fma.f64 #s(literal 0 binary64) phi2 (*.f64 #s(literal 2 binary64) (sin.f64 phi1)))
(+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (+ (* -1 (cos phi1)) (* -1 (* phi2 (sin phi1)))))))
(fma.f64 (fma.f64 (neg.f64 phi2) (sin.f64 phi1) #s(literal 0 binary64)) phi2 (*.f64 #s(literal 2 binary64) (sin.f64 phi1)))
(+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (+ (* -1 (cos phi1)) (* phi2 (+ (* -1 (sin phi1)) (* phi2 (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1))))))))))
(fma.f64 (fma.f64 (fma.f64 #s(literal 0 binary64) phi2 (neg.f64 (sin.f64 phi1))) phi2 #s(literal 0 binary64)) phi2 (*.f64 #s(literal 2 binary64) (sin.f64 phi1)))
(cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))
(cos.f64 (+.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2) phi2))
(cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI)))))
(cos.f64 (-.f64 (-.f64 lambda1 phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))
(atan2 (* 1/2 (- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (+.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2) phi2))) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(* 1/2 (- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))))
(*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (+.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2) phi2))) #s(literal 1/2 binary64))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))))
(-.f64 (cos.f64 (-.f64 (-.f64 lambda1 phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (+.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2) phi2)))
(+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))
(+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))

rewrite250.0ms (0.9%)

Memory
-103.6MiB live, 266.8MiB allocated
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
068409
0124374
1476308
24549308
08555308
Stop Event
iter limit
node limit
iter limit
Counts
26 → 491
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(sin.f64 lambda1)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
(cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
(-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))
(cos.f64 (+.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) lambda1) (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) phi2)) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2)) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) (cos.f64 (-.f64 phi2 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 phi2 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 4 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 3 binary64))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(neg.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal -2 binary64)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (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)) (sin.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(sin.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 lambda2) lambda1))
(sin.f64 (+.f64 lambda1 (neg.f64 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(cos.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda1)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) lambda1) (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) phi2)) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2)) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) (cos.f64 (-.f64 phi2 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 phi2 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 4 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 3 binary64))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(neg.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal -2 binary64)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (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)) (sin.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(sin.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 lambda2) lambda1))
(sin.f64 (+.f64 lambda1 (neg.f64 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(cos.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1))) (-.f64 lambda2 lambda1))
(*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (-.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1))))))
(fma.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1) (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)))
(fma.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))))
(cos.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2)))) (-.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2))))))
(fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) lambda1) (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) phi2))))
(sin.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (sin.f64 phi2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))))
(cos.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)))
(cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) phi2))))
(+.f64 (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) lambda1) (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) phi2)) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2)) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) (cos.f64 (-.f64 phi2 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 phi2 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 4 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 3 binary64))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(neg.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal -2 binary64)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))
(*.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))) (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
(*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.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 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (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)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))
(*.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))) (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 phi1 (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 phi1 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) #s(literal 2 binary64)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
(*.f64 (sin.f64 phi1) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal -2 binary64) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) lambda1) (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(literal 2 binary64))))
(*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) lambda1) (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) #s(literal -2 binary64))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) (neg.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) (neg.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (neg.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (neg.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) (neg.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) (neg.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) lambda1) (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) lambda1) (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2) (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))))
(fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)) (-.f64 (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))))
(-.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1))) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 3 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (pow.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) #s(literal 2 binary64)))))
(-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))))
(*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))) (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (+.f64 phi1 phi2)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (sin.f64 (-.f64 phi1 phi2))))
(fma.f64 (sin.f64 phi1) (cos.f64 phi2) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (sin.f64 (-.f64 phi1 phi2))))
(fma.f64 (cos.f64 phi2) (sin.f64 phi1) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (sin.f64 (-.f64 phi1 phi2))))
(-.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (/.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (sin.f64 (+.f64 phi1 phi2))))
(+.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))))
(+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))
(+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (sin.f64 (-.f64 phi1 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(/.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))
(fma.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 (+.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (+.f64 lambda2 lambda1)))
(cos.f64 (+.f64 lambda2 lambda1))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.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 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (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)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))

eval126.0ms (0.5%)

Memory
21.7MiB live, 210.1MiB allocated
Compiler

Compiled 36 620 to 3 305 computations (91% saved)

prune127.0ms (0.5%)

Memory
-22.4MiB live, 215.1MiB allocated
Pruning

76 alts after pruning (76 fresh and 0 done)

PrunedKeptTotal
New65566721
Fresh221032
Picked505
Done000
Total68276758
Accuracy
99.9%
Counts
758 → 76
Alt Table
Click to see full alt table
StatusAccuracyProgram
25.8%
(atan2.f64 (/.f64 (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
20.3%
(atan2.f64 (/.f64 (-.f64 (sin.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
24.4%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1) (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
20.4%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
26.9%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
14.4%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
13.1%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1))))
14.0%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
19.7%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
14.9%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
20.7%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
20.7%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
13.9%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
20.2%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) lambda2))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
77.5%
(atan2.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
74.4%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
17.3%
(atan2.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.8%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
99.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
89.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))))
75.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
74.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
76.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))))
64.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))))
73.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
82.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
59.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
81.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))))
63.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
61.5%
(atan2.f64 (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
70.4%
(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))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
78.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
71.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
78.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
54.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))))
64.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) #s(approx (cos (+ lambda2 lambda1)) (fma.f64 (neg.f64 lambda1) (sin.f64 lambda2) (cos.f64 lambda2)))))))
69.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 #s(approx (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
72.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
66.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
53.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))))
60.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))
53.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
52.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
49.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))))) phi1))))
53.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
69.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
69.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))))))
60.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
60.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
60.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
64.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
65.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
51.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (sin phi1) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2))) phi1)))))
53.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (sin phi1) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1)))))
51.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (sin phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1)))))
48.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (fma.f64 (-.f64 (cos.f64 phi1) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) phi2 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))))
51.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (-.f64 (sin.f64 phi2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))))))
49.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
23.0%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (-.f64 lambda1 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
62.1%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
58.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
61.5%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
60.9%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
46.1%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
41.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
27.1%
(atan2.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
78.7%
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
60.4%
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
56.1%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda2)))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
56.2%
(atan2.f64 (*.f64 #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)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
52.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
49.3%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
16.0%
(atan2.f64 #s(approx (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
44.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
48.6%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
Compiler

Compiled 6 772 to 4 420 computations (34.7% saved)

simplify137.0ms (0.5%)

Memory
-2.2MiB live, 146.2MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

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

Useful iterations: 0 (0.0ms)

IterNodesCost
097911
0156911
1304911
2756873
32358873
46032873
08252868
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
#s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
phi1
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))
#s(literal 1/24 binary64)
(*.f64 phi2 phi2)
phi2
#s(literal -1/2 binary64)
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
#s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
(cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))
(-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))
lambda1
(fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)
(PI.f64)
#s(literal 1/2 binary64)
lambda2
(cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
(-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)
(/.f64 (PI.f64) #s(literal 2 binary64))
#s(literal 2 binary64)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 phi2 phi2)
#s(literal 1 binary64)
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(sin.f64 phi1)
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 phi1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
#s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
phi1
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi2) phi2 #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi2) phi2 #s(literal 1 binary64)) (sin.f64 (-.f64 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)))
(*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi2) phi2 #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64)))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))
(fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))
#s(literal 1/24 binary64)
(*.f64 phi2 phi2)
phi2
#s(literal -1/2 binary64)
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (fma.f64 (PI.f64) #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (fma.f64 (PI.f64) #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal 2 binary64))
(-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (fma.f64 (PI.f64) #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))))
#s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
#s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (fma.f64 (PI.f64) #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))))
(cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))
(cos.f64 (fma.f64 (PI.f64) #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))
(fma.f64 (PI.f64) #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))
lambda1
(fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)
(fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)
(PI.f64)
#s(literal 1/2 binary64)
lambda2
(cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
(neg.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))
(-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)
(/.f64 (PI.f64) #s(literal 2 binary64))
#s(literal 2 binary64)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 phi2 phi2)
#s(literal 1 binary64)
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(sin.f64 phi1)

localize1.1s (4%)

Memory
2.3MiB live, 1 283.9MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.18359375
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
accuracy4.293127712394293
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
accuracy14.628299870939717
(cos.f64 (-.f64 lambda1 lambda2))
accuracy28.138927643907707
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
accuracy14.628299870939717
(cos.f64 (-.f64 lambda1 lambda2))
accuracy31.166163425851558
#s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
accuracy55.887203509719996
(cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
accuracy56.13291982850229
(cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))
accuracy14.628299870939717
(cos.f64 (-.f64 lambda1 lambda2))
accuracy14.85225978126673
(sin.f64 (-.f64 lambda1 lambda2))
accuracy26.030631885027816
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy28.262818931985294
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
accuracy0.18359375
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy14.628299870939717
(cos.f64 (-.f64 lambda1 lambda2))
accuracy14.85225978126673
(sin.f64 (-.f64 lambda1 lambda2))
accuracy37.84489830862307
#s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy0.1328125
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
accuracy0.15070045288117193
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
accuracy0.16015625
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2))
accuracy0.236660009768442
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
Samples
908.0ms238×1valid
50.0ms16×2valid
1.0ms0valid
Compiler

Compiled 773 to 85 computations (89% saved)

Precisions
Click to see histograms. Total time spent on operations: 873.0ms
ival-cos: 300.0ms (34.3% of total)
ival-sin: 235.0ms (26.9% of total)
adjust: 116.0ms (13.3% of total)
ival-mult: 108.0ms (12.4% of total)
ival-sub: 36.0ms (4.1% of total)
ival-add: 29.0ms (3.3% of total)
ival-atan2: 25.0ms (2.9% of total)
ival-div: 10.0ms (1.1% of total)
const: 8.0ms (0.9% of total)
ival-neg: 4.0ms (0.5% of total)
ival-pi: 2.0ms (0.2% of total)
exact: 1.0ms (0.1% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series94.0ms (0.4%)

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

12 calls:

TimeVariablePointExpression
18.0ms
phi2
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (* (sin (- lambda1 lambda2)) (+ (* 1/24 (* phi2 phi2)) -1/2)) (* phi2 phi2)) (sin (- lambda1 lambda2))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* (sin (- lambda1 lambda2)) (+ (* 1/24 (* phi2 phi2)) -1/2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (sin phi1) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (cos (- lambda1 lambda2)) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (+ (* -1/2 (* phi2 phi2)) 1) (* (cos (- lambda1 lambda2)) (sin phi1))) (* (cos (- lambda1 lambda2)) (sin phi1)))
10.0ms
lambda1
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (* (sin (- lambda1 lambda2)) (+ (* 1/24 (* phi2 phi2)) -1/2)) (* phi2 phi2)) (sin (- lambda1 lambda2))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* (sin (- lambda1 lambda2)) (+ (* 1/24 (* phi2 phi2)) -1/2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (sin phi1) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (cos (- lambda1 lambda2)) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (+ (* -1/2 (* phi2 phi2)) 1) (* (cos (- lambda1 lambda2)) (sin phi1))) (* (cos (- lambda1 lambda2)) (sin phi1)))
8.0ms
lambda1
@inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (* (sin (- lambda1 lambda2)) (+ (* 1/24 (* phi2 phi2)) -1/2)) (* phi2 phi2)) (sin (- lambda1 lambda2))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* (sin (- lambda1 lambda2)) (+ (* 1/24 (* phi2 phi2)) -1/2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (sin phi1) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (cos (- lambda1 lambda2)) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (+ (* -1/2 (* phi2 phi2)) 1) (* (cos (- lambda1 lambda2)) (sin phi1))) (* (cos (- lambda1 lambda2)) (sin phi1)))
8.0ms
lambda2
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (* (sin (- lambda1 lambda2)) (+ (* 1/24 (* phi2 phi2)) -1/2)) (* phi2 phi2)) (sin (- lambda1 lambda2))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* (sin (- lambda1 lambda2)) (+ (* 1/24 (* phi2 phi2)) -1/2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (sin phi1) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (cos (- lambda1 lambda2)) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (+ (* -1/2 (* phi2 phi2)) 1) (* (cos (- lambda1 lambda2)) (sin phi1))) (* (cos (- lambda1 lambda2)) (sin phi1)))
8.0ms
lambda2
@inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (* (sin (- lambda1 lambda2)) (+ (* 1/24 (* phi2 phi2)) -1/2)) (* phi2 phi2)) (sin (- lambda1 lambda2))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* (sin (- lambda1 lambda2)) (+ (* 1/24 (* phi2 phi2)) -1/2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (sin phi1) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (cos (- lambda1 lambda2)) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (+ (* -1/2 (* phi2 phi2)) 1) (* (cos (- lambda1 lambda2)) (sin phi1))) (* (cos (- lambda1 lambda2)) (sin phi1)))

simplify327.0ms (1.2%)

Memory
-9.0MiB live, 256.5MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
011637639
144067591
093087017
Stop Event
iter limit
node limit
Counts
287 → 286
Calls
Call 1
Inputs
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (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)))))
(* -1 (sin lambda2))
(+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2)))))))
lambda1
(* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(* -1 lambda2)
(- lambda1 lambda2)
(+ (sin (neg lambda2)) (* (pow phi2 2) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))))
(+ (sin (neg lambda2)) (+ (* lambda1 (+ (cos (neg lambda2)) (* (pow phi2 2) (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))))) (* (pow phi2 2) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))
(+ (sin (neg lambda2)) (+ (* lambda1 (+ (cos (neg lambda2)) (+ (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/2 (* (pow phi2 2) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))) (* (pow phi2 2) (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))) (* (pow phi2 2) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))
(+ (sin (neg lambda2)) (+ (* lambda1 (+ (cos (neg lambda2)) (+ (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (+ (* -1/2 (* (pow phi2 2) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))) (* lambda1 (+ (* -1/6 (cos (neg lambda2))) (* -1/6 (* (pow phi2 2) (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))))))))) (* (pow phi2 2) (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))) (* (pow phi2 2) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))
(+ (* lambda1 (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))) (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))) (* -1/6 (* lambda1 (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))) (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))
(cos (- (+ phi2 (* 1/2 (PI))) lambda2))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))) (* 1/6 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(atan2 (* 1/2 (- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))
(+ (* 1/2 (* lambda1 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(+ (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (* 1/2 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))))
(+ (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (* lambda1 (+ (* 1/2 (* lambda1 (- (* -1/6 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (* 1/2 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))))))))
(- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (+ (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* lambda1 (- (* -1/6 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* -1/2 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda1 (- (* 1/4 (* lambda1 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* -1 (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (* (sin phi1) (sin (neg lambda2)))))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos (neg lambda2)) (sin phi1)))) (* (sin phi1) (sin (neg lambda2))))))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (sin phi1) (sin (neg lambda2))))) (* 1/2 (* (cos (neg lambda2)) (sin phi1))))) (* (sin phi1) (sin (neg lambda2))))))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(cos (neg (+ lambda2 (* 1/2 (PI)))))
(+ (cos (neg (+ lambda2 (* 1/2 (PI))))) (* -1 (* lambda1 (sin (neg (+ lambda2 (* 1/2 (PI))))))))
(+ (cos (neg (+ lambda2 (* 1/2 (PI))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg (+ lambda2 (* 1/2 (PI))))))) (sin (neg (+ lambda2 (* 1/2 (PI))))))))
(+ (cos (neg (+ lambda2 (* 1/2 (PI))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg (+ lambda2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (sin (neg (+ lambda2 (* 1/2 (PI))))))))) (sin (neg (+ lambda2 (* 1/2 (PI))))))))
(cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1 (* lambda1 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(* (cos (neg lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))
(+ (* -1 (* lambda1 (* (sin phi1) (* (sin (neg lambda2)) (+ 1 (* -1/2 (pow phi2 2))))))) (* (cos (neg lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))
(+ (* lambda1 (+ (* -1 (* (sin phi1) (* (sin (neg lambda2)) (+ 1 (* -1/2 (pow phi2 2)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))))) (* (cos (neg lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))
(+ (* lambda1 (+ (* -1 (* (sin phi1) (* (sin (neg lambda2)) (+ 1 (* -1/2 (pow phi2 2)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))) (* 1/6 (* lambda1 (* (sin phi1) (* (sin (neg lambda2)) (+ 1 (* -1/2 (pow phi2 2))))))))))) (* (cos (neg lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))
(* (cos (neg lambda2)) (sin phi1))
(+ (* -1 (* lambda1 (* (sin phi1) (sin (neg lambda2))))) (* (cos (neg lambda2)) (sin phi1)))
(+ (* lambda1 (+ (* -1 (* (sin phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin phi1)))))) (* (cos (neg lambda2)) (sin phi1)))
(+ (* lambda1 (+ (* -1 (* (sin phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin phi1))) (* 1/6 (* lambda1 (* (sin phi1) (sin (neg lambda2))))))))) (* (cos (neg lambda2)) (sin phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(sin lambda1)
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (* (sin (- lambda1 lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))))
(* (sin (- lambda1 lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))
(cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))
(* 1/2 (- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))))
(- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(cos (- lambda1 lambda2))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))
(cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI))))))
(* (cos (- lambda1 lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))
(* (cos (- lambda1 lambda2)) (sin phi1))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(+ (sin (neg (+ lambda2 (* -1 lambda1)))) (* (pow phi2 2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (- (* 1/24 (pow phi2 2)) 1/2))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (sin (neg (+ lambda2 (* -1 lambda1)))) (- (* 1/24 (pow phi2 2)) 1/2))
(cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))
(atan2 (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))))
(- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(cos (neg (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))
(cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))))
(* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))
(* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ (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 (* -1 lambda2))
(+ (sin lambda1) (* (pow phi2 2) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2))))
(+ (sin lambda1) (+ (* lambda2 (+ (* -1 (cos lambda1)) (* -1 (* (pow phi2 2) (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))) (* (pow phi2 2) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))
(+ (sin lambda1) (+ (* lambda2 (+ (* -1 (cos lambda1)) (+ (* -1 (* (pow phi2 2) (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/2 (* (pow phi2 2) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2))))))))) (* (pow phi2 2) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))
(+ (sin lambda1) (+ (* lambda2 (+ (* -1 (cos lambda1)) (+ (* -1 (* (pow phi2 2) (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* -1/2 (* (pow phi2 2) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))) (* lambda2 (+ (* 1/6 (cos lambda1)) (* 1/6 (* (pow phi2 2) (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))))))))) (* (pow phi2 2) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))
(* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2))
(+ (* -1 (* lambda2 (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2))) (* -1/2 (* lambda2 (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2))) (* lambda2 (+ (* -1/2 (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2))) (* 1/6 (* lambda2 (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))))) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))
(cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1/2 (* lambda2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))
(* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
(+ (* 1/2 (* lambda2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))
(+ (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))))
(+ (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* lambda2 (+ (* 1/2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* 1/6 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))))))
(- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (+ (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (+ (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (+ (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (* 1/6 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* 1/2 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda2 (- (* 1/4 (* lambda2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 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)))))
(* -1 (* (cos lambda1) (sin phi1)))
(+ (* -1 (* lambda2 (* (sin lambda1) (sin phi1)))) (* -1 (* (cos lambda1) (sin phi1))))
(+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* 1/2 (* lambda2 (* (cos lambda1) (sin phi1)))))))
(+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* lambda2 (+ (* 1/6 (* lambda2 (* (sin lambda1) (sin phi1)))) (* 1/2 (* (cos lambda1) (sin phi1))))))))
(cos (- lambda1 (* 1/2 (PI))))
(+ (cos (- lambda1 (* 1/2 (PI)))) (* lambda2 (sin (- lambda1 (* 1/2 (PI))))))
(+ (cos (- lambda1 (* 1/2 (PI)))) (* lambda2 (- (* -1/2 (* lambda2 (cos (- lambda1 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (* 1/2 (PI))))))))
(+ (cos (- lambda1 (* 1/2 (PI)))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- lambda1 (* 1/2 (PI))))) (* -1/6 (* lambda2 (sin (- lambda1 (* 1/2 (PI)))))))) (* -1 (sin (- lambda1 (* 1/2 (PI))))))))
(cos (- lambda1 (+ phi2 (* 1/2 (PI)))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1/2 (* lambda2 (cos (- lambda1 (+ phi2 (* 1/2 (PI))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))
(* (cos lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))
(+ (* lambda2 (* (sin lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))) (* (cos lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))) (* (sin lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))) (* (cos lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))) (* -1/6 (* lambda2 (* (sin lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))))) (* (sin lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))) (* (cos lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))
(* (cos lambda1) (sin phi1))
(+ (* lambda2 (* (sin lambda1) (sin phi1))) (* (cos lambda1) (sin phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin phi1)))) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (sin phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin phi1))) (* -1/6 (* lambda2 (* (sin lambda1) (sin phi1)))))) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (sin phi1)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(+ (sin (+ lambda1 (* -1 lambda2))) (* (pow phi2 2) (* (sin (+ lambda1 (* -1 lambda2))) (- (* 1/24 (pow phi2 2)) 1/2))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (sin (+ lambda1 (* -1 lambda2))) (- (* 1/24 (pow phi2 2)) 1/2))
(cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))
(atan2 (* 1/2 (- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* 1/2 (- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))))
(- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(cos (+ lambda1 (* -1 lambda2)))
(* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(cos (- (+ lambda1 (* -1 lambda2)) (* 1/2 (PI))))
(cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI)))))
(* (cos (+ lambda1 (* -1 lambda2))) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))
(* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))
(* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(* phi1 (cos phi2))
(* phi1 (+ (cos phi2) (* -1/6 (* (pow phi1 2) (cos phi2)))))
(* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* 1/120 (* (pow phi1 2) (cos phi2)))))))
(* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos phi2))) (* 1/120 (cos phi2))))))))
(- (sin phi2) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(- (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (* -1/2 (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (+ (* -1/2 (sin phi2)) (* -1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(* -1 (* phi1 (cos (- lambda1 lambda2))))
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* 1/6 (* (pow phi1 2) (cos (- lambda1 lambda2))))))
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/6 (cos (- lambda1 lambda2)))))))
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* 1/6 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (cos (- lambda1 lambda2))) (* 1/5040 (* (pow phi1 2) (cos (- lambda1 lambda2))))))))))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(* phi1 (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2)))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2)))))) (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2))))))
(* phi1 (+ (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2))))) (* 1/120 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2))))))))))
(* phi1 (+ (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2)))))) (* 1/120 (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2)))))))))))
(* phi1 (cos (- lambda1 lambda2)))
(* phi1 (+ (cos (- lambda1 lambda2)) (* -1/6 (* (pow phi1 2) (cos (- lambda1 lambda2))))))
(* phi1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/120 (* (pow phi1 2) (cos (- lambda1 lambda2))))))))
(* phi1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/6 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/120 (cos (- lambda1 lambda2)))))))))
(* (cos phi2) (sin phi1))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(+ (sin (- 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/2 (sin (- lambda1 lambda2)))
(+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(cos (- (+ lambda1 (* 1/2 (PI))) lambda2))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* -1/2 (* phi2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))
(+ (* 1/2 (* phi2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(+ (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* 1/2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))))
(+ (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* phi2 (+ (* 1/2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))
(- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (+ (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* phi2 (- (* -1/6 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(sin phi1)
(+ (sin phi1) (* -1/2 (* (pow phi2 2) (sin phi1))))
(+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow phi2 2) (sin phi1))))))
(+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin phi1))) (* 1/24 (sin phi1)))))))
(* -1 (* (cos (- lambda2 lambda1)) (sin phi1)))
(- (* phi2 (- (cos phi1) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(- (* phi2 (- (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (sin phi1))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(- (* phi2 (- (+ (cos phi1) (* phi2 (- (* phi2 (- (* -1/6 (cos phi1)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1))))))) (* -1/2 (* (cos (- lambda2 lambda1)) (sin phi1)))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (* -1/2 (* phi2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/6 (* phi2 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))
(* 1/24 (* (pow phi2 4) (sin (- lambda1 lambda2))))
(* (pow phi2 4) (+ (* -1/2 (/ (sin (- lambda1 lambda2)) (pow phi2 2))) (* 1/24 (sin (- lambda1 lambda2)))))
(* (pow phi2 4) (+ (* -1/2 (/ (sin (- lambda1 lambda2)) (pow phi2 2))) (+ (* 1/24 (sin (- lambda1 lambda2))) (/ (sin (- lambda1 lambda2)) (pow phi2 4)))))
(* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (- lambda1 lambda2)) (pow phi2 2))) (* 1/24 (sin (- lambda1 lambda2)))))
(* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1))))
(* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (/ (* (cos (- lambda1 lambda2)) (sin phi1)) (pow phi2 2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))
(atan2 (* 1/2 (- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/2 (- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))))
(- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI)))))
Outputs
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))))
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 phi2)) (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 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (sin.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 (cos.f64 phi2)) (sin.f64 lambda2)))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
lambda1
(* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda1)
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))
(*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1)
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))
(*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 phi2)) (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 (cos.f64 phi2)) (sin.f64 lambda2)) (*.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/6 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda2)))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(+ (sin (neg lambda2)) (* (pow phi2 2) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))))
(fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (+ (* lambda1 (+ (cos (neg lambda2)) (* (pow phi2 2) (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))))) (* (pow phi2 2) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))
(fma.f64 (sin.f64 lambda2) #s(literal -1 binary64) (fma.f64 (*.f64 (*.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (cos.f64 lambda2)) (*.f64 phi2 phi2) (cos.f64 lambda2)) lambda1)))
(+ (sin (neg lambda2)) (+ (* lambda1 (+ (cos (neg lambda2)) (+ (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/2 (* (pow phi2 2) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))) (* (pow phi2 2) (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))) (* (pow phi2 2) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))
(fma.f64 (sin.f64 lambda2) #s(literal -1 binary64) (fma.f64 (*.f64 (*.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 (+.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 lambda2)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2)))) lambda1)) (cos.f64 lambda2)) lambda1)))
(+ (sin (neg lambda2)) (+ (* lambda1 (+ (cos (neg lambda2)) (+ (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (+ (* -1/2 (* (pow phi2 2) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))) (* lambda1 (+ (* -1/6 (cos (neg lambda2))) (* -1/6 (* (pow phi2 2) (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))))))))) (* (pow phi2 2) (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))) (* (pow phi2 2) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))
(fma.f64 (sin.f64 lambda2) #s(literal -1 binary64) (fma.f64 (*.f64 (*.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 (+.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 lambda2)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (*.f64 (*.f64 #s(literal -1/6 binary64) (fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (cos.f64 lambda2)) (*.f64 phi2 phi2) (cos.f64 lambda2))) lambda1)) lambda1)) (cos.f64 lambda2)) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))
(*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 lambda2)))
(+ (* lambda1 (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))
(fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))) (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (cos.f64 lambda2))) lambda1 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))) (* -1/6 (* lambda1 (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))))) (* (cos (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))) (* (sin (neg lambda2)) (- (* 1/24 (pow phi2 2)) 1/2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (cos.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)))) lambda1 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (cos.f64 lambda2))) lambda1 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 lambda2))))
(cos (- (+ phi2 (* 1/2 (PI))) lambda2))
(cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(fma.f64 (neg.f64 lambda1) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) lambda1 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))) (* 1/6 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (*.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) #s(literal -1/2 binary64))) lambda1) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) lambda1 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(atan2 (* 1/2 (- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (-.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1) lambda2))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))
(*.f64 (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda1 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))))
(+ (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (* 1/2 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))))) lambda1 (*.f64 (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (* lambda1 (+ (* 1/2 (* lambda1 (- (* -1/6 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (* 1/2 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))) lambda1 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))))) lambda1 (*.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 1/2 binary64))) lambda1 (*.f64 (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 1/2 binary64)))
(- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (+ (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* lambda1 (- (* -1/6 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))) lambda1 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))) lambda1 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(- (+ (* -1/2 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (sin.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(- (+ (* lambda1 (- (* 1/4 (* lambda1 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) lambda1) (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda1 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(- (+ (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/12 binary64) lambda1) (*.f64 (sin.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda1 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda1 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (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) (*.f64 #s(literal 1 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 (*.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(* -1 (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda2))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (* (sin phi1) (sin (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (sin.f64 phi1)) (neg.f64 (sin.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda2)))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos (neg lambda2)) (sin phi1)))) (* (sin phi1) (sin (neg lambda2))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1))) lambda1))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (sin phi1) (sin (neg lambda2))))) (* 1/2 (* (cos (neg lambda2)) (sin phi1))))) (* (sin phi1) (sin (neg lambda2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)) (sin.f64 phi1))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1))) lambda1 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda2)))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1 binary64) (sin.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1 binary64) (sin.f64 lambda2)))) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))) lambda1)) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(cos (neg (+ lambda2 (* 1/2 (PI)))))
(cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))
(+ (cos (neg (+ lambda2 (* 1/2 (PI))))) (* -1 (* lambda1 (sin (neg (+ lambda2 (* 1/2 (PI))))))))
(fma.f64 (neg.f64 lambda1) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (neg.f64 lambda2))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(+ (cos (neg (+ lambda2 (* 1/2 (PI))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg (+ lambda2 (* 1/2 (PI))))))) (sin (neg (+ lambda2 (* 1/2 (PI))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (neg.f64 lambda2)))) lambda1 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(+ (cos (neg (+ lambda2 (* 1/2 (PI))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg (+ lambda2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (sin (neg (+ lambda2 (* 1/2 (PI))))))))) (sin (neg (+ lambda2 (* 1/2 (PI))))))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (neg.f64 lambda2))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) #s(literal -1/2 binary64))) lambda1) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (neg.f64 lambda2)))) lambda1 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))
(cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1 (* lambda1 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (*.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) #s(literal -1/2 binary64))) lambda1) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(* (cos (neg lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 phi1)) (cos.f64 lambda2))
(+ (* -1 (* lambda1 (* (sin phi1) (* (sin (neg lambda2)) (+ 1 (* -1/2 (pow phi2 2))))))) (* (cos (neg lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))
(fma.f64 (neg.f64 lambda1) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (sin.f64 phi1)) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 phi1)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (sin phi1) (* (sin (neg lambda2)) (+ 1 (* -1/2 (pow phi2 2)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))))) (* (cos (neg lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 phi1)) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))))) lambda1 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 phi1)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (sin phi1) (* (sin (neg lambda2)) (+ 1 (* -1/2 (pow phi2 2)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))) (* 1/6 (* lambda1 (* (sin phi1) (* (sin (neg lambda2)) (+ 1 (* -1/2 (pow phi2 2))))))))))) (* (cos (neg lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))
(fma.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 phi1)))) lambda1)) lambda1 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 phi1)) (cos.f64 lambda2)))
(* (cos (neg lambda2)) (sin phi1))
(*.f64 (cos.f64 lambda2) (sin.f64 phi1))
(+ (* -1 (* lambda1 (* (sin phi1) (sin (neg lambda2))))) (* (cos (neg lambda2)) (sin phi1)))
(fma.f64 (neg.f64 (*.f64 lambda1 (sin.f64 phi1))) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (sin phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin phi1)))))) (* (cos (neg lambda2)) (sin phi1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal 1 binary64) (sin.f64 lambda2)) (sin.f64 phi1))) lambda1 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (sin phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin phi1))) (* 1/6 (* lambda1 (* (sin phi1) (sin (neg lambda2))))))))) (* (cos (neg lambda2)) (sin phi1)))
(fma.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (sin.f64 phi1))) lambda1)) lambda1 (*.f64 (cos.f64 lambda2) (sin.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 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin lambda1)
(sin.f64 lambda1)
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64) #s(literal 1 binary64)) lambda1)
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (* (sin (- lambda1 lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))))
(fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (- lambda1 lambda2)) (- (* 1/24 (pow phi2 2)) 1/2))
(*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))
(cos.f64 (-.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1) lambda2))
(* 1/2 (- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (-.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1) lambda2))) #s(literal 1/2 binary64))
(- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))
(-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (-.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1) lambda2)))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))
(cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI))))))
(cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(* (cos (- lambda1 lambda2)) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(* (cos (- lambda1 lambda2)) (sin phi1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))) (cos.f64 phi2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))
(+ (sin (neg (+ lambda2 (* -1 lambda1)))) (* (pow phi2 2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (- (* 1/24 (pow phi2 2)) 1/2))))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(* (sin (neg (+ lambda2 (* -1 lambda1)))) (- (* 1/24 (pow phi2 2)) 1/2))
(*.f64 (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)))
(cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2) (neg.f64 lambda1)))
(atan2 (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1)))) (cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2) (neg.f64 lambda1)))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1)))) (cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2) (neg.f64 lambda1)))) #s(literal 1/2 binary64))
(- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))
(-.f64 (cos.f64 (+.f64 (+.f64 lambda2 phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1)))) (cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2) (neg.f64 lambda1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2))
(* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(cos (neg (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))
(cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1)) lambda2))
(cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))))
(cos.f64 (+.f64 (+.f64 lambda2 phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1))))
(* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))
(*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))
(*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (sin.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) (* -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 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ lambda1 (* -1 lambda2))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(+ (sin lambda1) (* (pow phi2 2) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2))))
(fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (sin.f64 lambda1)) (*.f64 phi2 phi2) (sin.f64 lambda1))
(+ (sin lambda1) (+ (* lambda2 (+ (* -1 (cos lambda1)) (* -1 (* (pow phi2 2) (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))) (* (pow phi2 2) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))
(+.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (sin.f64 lambda1)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 lambda1)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (cos.f64 lambda1))) lambda2)) (sin.f64 lambda1))
(+ (sin lambda1) (+ (* lambda2 (+ (* -1 (cos lambda1)) (+ (* -1 (* (pow phi2 2) (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/2 (* (pow phi2 2) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2))))))))) (* (pow phi2 2) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))
(+.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (sin.f64 lambda1)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 (+.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 lambda1)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (cos.f64 lambda1))) (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (sin.f64 lambda1)) (*.f64 phi2 phi2) (sin.f64 lambda1))) lambda2)) lambda2)) (sin.f64 lambda1))
(+ (sin lambda1) (+ (* lambda2 (+ (* -1 (cos lambda1)) (+ (* -1 (* (pow phi2 2) (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* -1/2 (* (pow phi2 2) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))) (* lambda2 (+ (* 1/6 (cos lambda1)) (* 1/6 (* (pow phi2 2) (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))))))))) (* (pow phi2 2) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))
(+.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (sin.f64 lambda1)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 (+.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 lambda1)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (cos.f64 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (sin.f64 lambda1)) (*.f64 phi2 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (cos.f64 lambda1) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (cos.f64 lambda1)) (*.f64 phi2 phi2)))) lambda2)) lambda2)) lambda2)) (sin.f64 lambda1))
(* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2))
(*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (sin.f64 lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))
(fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (cos.f64 lambda1)) (neg.f64 lambda2) (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (sin.f64 lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2))) (* -1/2 (* lambda2 (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)))) lambda2 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (sin.f64 lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2))) (* lambda2 (+ (* -1/2 (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2))) (* 1/6 (* lambda2 (* (cos lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))))))) (* (sin lambda1) (- (* 1/24 (pow phi2 2)) 1/2)))
(fma.f64 (fma.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64))) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (cos.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)))) lambda2)) lambda2 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (sin.f64 lambda1)))
(cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))
(cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
(fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)) lambda2 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1/2 (* lambda2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))) lambda2 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)) (*.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)) #s(literal -1/2 binary64))) lambda2 (*.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))) lambda2 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))))
(+ (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))) lambda2 (-.f64 (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) lambda2 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* lambda2 (+ (* 1/2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* 1/6 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))))) lambda2 (*.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) #s(literal 1/2 binary64))) lambda2 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) #s(literal 1/2 binary64)))
(- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(-.f64 (fma.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (+ (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(-.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))) lambda2 (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (+ (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (+ (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (* 1/6 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))))) lambda2 (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) lambda2 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(- (+ (* lambda2 (- (* 1/4 (* lambda2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda2 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(- (+ (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/12 binary64) lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda2 (*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda2 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1 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 (*.f64 #s(literal 1 binary64) (sin.f64 lambda1))) lambda2 (cos.f64 lambda1))
(* -1 (* (cos lambda1) (sin phi1)))
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 phi1))
(+ (* -1 (* lambda2 (* (sin lambda1) (sin phi1)))) (* -1 (* (cos lambda1) (sin phi1))))
(neg.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))
(+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* 1/2 (* lambda2 (* (cos lambda1) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 phi1))) lambda2))
(+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* lambda2 (+ (* 1/6 (* lambda2 (* (sin lambda1) (sin phi1)))) (* 1/2 (* (cos lambda1) (sin phi1))))))))
(fma.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (sin.f64 phi1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) lambda2)) lambda2 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 phi1)))
(cos (- lambda1 (* 1/2 (PI))))
(cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+ (cos (- lambda1 (* 1/2 (PI)))) (* lambda2 (sin (- lambda1 (* 1/2 (PI))))))
(fma.f64 (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2 (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+ (cos (- lambda1 (* 1/2 (PI)))) (* lambda2 (- (* -1/2 (* lambda2 (cos (- lambda1 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (* 1/2 (PI))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (neg.f64 (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) lambda2 (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+ (cos (- lambda1 (* 1/2 (PI)))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- lambda1 (* 1/2 (PI))))) (* -1/6 (* lambda2 (sin (- lambda1 (* 1/2 (PI)))))))) (* -1 (sin (- lambda1 (* 1/2 (PI))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1/2 binary64))) lambda2 (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) lambda2 (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos (- lambda1 (+ phi2 (* 1/2 (PI)))))
(cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))
(fma.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1/2 (* lambda2 (cos (- lambda1 (+ phi2 (* 1/2 (PI))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) #s(literal -1/2 binary64))) lambda2 (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))
(* (cos lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))
(*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(+ (* lambda2 (* (sin lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))) (* (cos lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))
(fma.f64 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) lambda2) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))) (* (sin lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))) (* (cos lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) lambda2 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))) (* -1/6 (* lambda2 (* (sin lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))))) (* (sin lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))) (* (cos lambda1) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 phi1)))) lambda2 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) lambda2 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(* (cos lambda1) (sin phi1))
(*.f64 (cos.f64 lambda1) (sin.f64 phi1))
(+ (* lambda2 (* (sin lambda1) (sin phi1))) (* (cos lambda1) (sin phi1)))
(fma.f64 (*.f64 (sin.f64 lambda1) lambda2) (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (sin.f64 phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin phi1)))) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (sin phi1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) lambda2 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin phi1))) (* -1/6 (* lambda2 (* (sin lambda1) (sin phi1)))))) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (sin phi1)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (sin.f64 phi1))) lambda2 (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) lambda2 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 lambda2))
(+ (sin (+ lambda1 (* -1 lambda2))) (* (pow phi2 2) (* (sin (+ lambda1 (* -1 lambda2))) (- (* 1/24 (pow phi2 2)) 1/2))))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
(* (sin (+ lambda1 (* -1 lambda2))) (- (* 1/24 (pow phi2 2)) 1/2))
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)))
(cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))
(cos.f64 (+.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda2)) phi2) lambda1))
(atan2 (* 1/2 (- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda2)) phi2) lambda1))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
(* 1/2 (- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))))
(*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda2)) phi2) lambda1))) #s(literal 1/2 binary64))
(- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))
(-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda2)) phi2) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1))
(* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(cos (- (+ lambda1 (* -1 lambda2)) (* 1/2 (PI))))
(cos.f64 (+.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (neg.f64 lambda2))))
(cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI)))))
(cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))
(* (cos (+ lambda1 (* -1 lambda2))) (* (sin phi1) (+ 1 (* -1/2 (pow phi2 2)))))
(*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))
(*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (sin.f64 phi1))
(* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/120 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) phi1)
(* phi1 (cos phi2))
(*.f64 (cos.f64 phi2) phi1)
(* phi1 (+ (cos phi2) (* -1/6 (* (pow phi1 2) (cos phi2)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (cos.f64 phi2) (cos.f64 phi2)) phi1)
(* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* 1/120 (* (pow phi1 2) (cos phi2)))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (cos.f64 phi2) (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2))) (*.f64 phi1 phi1) (cos.f64 phi2)) phi1)
(* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos phi2))) (* 1/120 (cos phi2))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1)) (cos.f64 phi2) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi2))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2))) (*.f64 phi1 phi1) (cos.f64 phi2)) phi1)
(- (sin phi2) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(-.f64 (sin.f64 phi2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))))
(- (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (+.f64 (cos.f64 phi2) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (* -1/2 (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(+.f64 (sin.f64 phi2) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (cos.f64 phi2) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (+ (* -1/2 (sin phi2)) (* -1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(+.f64 (sin.f64 phi2) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 phi2) (*.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (+.f64 (cos.f64 phi2) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) phi1)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (cos.f64 phi2) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(* -1 (* phi1 (cos (- lambda1 lambda2))))
(*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* 1/6 (* (pow phi1 2) (cos (- lambda1 lambda2))))))
(*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/6 (cos (- lambda1 lambda2)))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) (*.f64 phi1 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* 1/6 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (cos (- lambda1 lambda2))) (* 1/5040 (* (pow phi1 2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/5040 binary64) (*.f64 phi1 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/120 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/120 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1)
(* phi1 (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1)
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2)))))) (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(* phi1 (+ (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2))))) (* 1/120 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(* phi1 (+ (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2)))))) (* 1/120 (* (cos (- lambda1 lambda2)) (+ 1 (* -1/2 (pow phi2 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/120 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(* phi1 (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1)
(* phi1 (+ (cos (- lambda1 lambda2)) (* -1/6 (* (pow phi1 2) (cos (- lambda1 lambda2))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) phi1)
(* phi1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/120 (* (pow phi1 2) (cos (- lambda1 lambda2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2))) phi1)
(* phi1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/6 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/120 (cos (- lambda1 lambda2)))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/120 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2))) phi1)
(* (cos phi2) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (fma.f64 #s(literal 1 binary64) phi1 (neg.f64 phi2)))) (cos.f64 (-.f64 lambda2 lambda1))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (fma.f64 #s(literal 1 binary64) phi1 (neg.f64 phi2)))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+ (* -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 (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (sin.f64 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)))))))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi2 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 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))))))))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/24 binary64) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi2 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (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 (fma.f64 (*.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(* -1/2 (sin (- lambda1 lambda2)))
(*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(fma.f64 (*.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(cos (- (+ lambda1 (* 1/2 (PI))) lambda2))
(cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(fma.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (neg.f64 phi2) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* -1/2 (* phi2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) phi2 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi2) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (*.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) #s(literal -1/2 binary64))) phi2) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) phi2 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* phi2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))))
(+ (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* 1/2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))) phi2 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))))) phi2 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* phi2 (+ (* 1/2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/6 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))))) phi2 (*.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) #s(literal 1/2 binary64))) phi2 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) #s(literal 1/2 binary64)))
(- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))) phi2 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (+ (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* phi2 (- (* -1/6 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/6 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))))) phi2 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal 1/24 binary64) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* -1/2 (* (pow phi2 2) (sin phi1))))
(fma.f64 (*.f64 (*.f64 phi2 phi2) (sin.f64 phi1)) #s(literal -1/2 binary64) (sin.f64 phi1))
(+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow phi2 2) (sin phi1))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (sin.f64 phi1)) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) (*.f64 phi2 phi2) (sin.f64 phi1))
(+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin phi1))) (* 1/24 (sin phi1)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) (sin.f64 phi1) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi1))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) (*.f64 phi2 phi2) (sin.f64 phi1))
(* -1 (* (cos (- lambda2 lambda1)) (sin phi1)))
(*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))
(- (* phi2 (- (cos phi1) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(fma.f64 (-.f64 (cos.f64 phi1) (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64))) phi2 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))
(- (* phi2 (- (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (sin phi1))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64))) phi2 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))
(- (* phi2 (- (+ (cos phi1) (* phi2 (- (* phi2 (- (* -1/6 (cos phi1)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1))))))) (* -1/2 (* (cos (- lambda2 lambda1)) (sin phi1)))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(fma.f64 (+.f64 (cos.f64 phi1) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))) phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) phi2 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 phi2 phi2)) #s(literal 1/24 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) #s(literal 1/24 binary64))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))
(fma.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (* -1/2 (* phi2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/6 (* phi2 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) #s(literal -1/2 binary64))) phi2 (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))
(* 1/24 (* (pow phi2 4) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 4 binary64))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (pow phi2 4) (+ (* -1/2 (/ (sin (- lambda1 lambda2)) (pow phi2 2))) (* 1/24 (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)) #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (pow.f64 phi2 #s(literal 4 binary64)))
(* (pow phi2 4) (+ (* -1/2 (/ (sin (- lambda1 lambda2)) (pow phi2 2))) (+ (* 1/24 (sin (- lambda1 lambda2))) (/ (sin (- lambda1 lambda2)) (pow phi2 4)))))
(*.f64 (fma.f64 (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) (pow.f64 phi2 #s(literal 4 binary64))))) (pow.f64 phi2 #s(literal 4 binary64)))
(* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (- lambda1 lambda2)) (pow phi2 2))) (* 1/24 (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)) #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2))
(* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1))))
(*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (/ (* (cos (- lambda1 lambda2)) (sin phi1)) (pow phi2 2))))
(*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 phi2 phi2))) (*.f64 phi2 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))))
(cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))
(cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2) (neg.f64 phi2)))
(atan2 (* 1/2 (- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2) (neg.f64 phi2)))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(* 1/2 (- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))))
(*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2) (neg.f64 phi2)))) #s(literal 1/2 binary64))
(- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))))
(-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2) (neg.f64 phi2))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI)))))
(cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))

rewrite209.0ms (0.8%)

Memory
11.4MiB live, 245.6MiB allocated
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
097563
0156553
1653491
26257491
08191491
Stop Event
iter limit
node limit
iter limit
Counts
28 → 443
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(sin.f64 lambda1)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 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)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64)))
(cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))
#s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.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 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (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)) (sin.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(sin.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 lambda1 (neg.f64 lambda2)))
(sin.f64 (+.f64 (neg.f64 lambda2) lambda1))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(cos.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda1)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (sin.f64 phi1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (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)) (sin.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(sin.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 lambda1 (neg.f64 lambda2)))
(sin.f64 (+.f64 (neg.f64 lambda2) lambda1))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(cos.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1))) (-.f64 lambda2 lambda1))
(*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (-.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))
(-.f64 lambda1 lambda2)
(/.f64 (-.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 2 binary64))) (-.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (-.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 3 binary64))) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (-.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (fabs.f64 phi2)) (fabs.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (neg.f64 phi2)) (neg.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (*.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi2) phi2) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi2)) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (fabs.f64 phi2) (*.f64 (fabs.f64 phi2) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (neg.f64 phi2) (*.f64 (neg.f64 phi2) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi2) phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 phi2 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(-.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))
(-.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi2))) phi2))
(-.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2)))
(-.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (*.f64 phi2 phi2)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi2) phi2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 3 binary64)) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (-.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (-.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1/13824 binary64) #s(literal -1/8 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 phi2 phi2) #s(literal -1/48 binary64))))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (*.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1/13824 binary64) #s(literal -1/8 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 phi2 phi2) #s(literal -1/48 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) phi2)) phi2 (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 1/24 binary64)) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 #s(literal 1/24 binary64) phi2) (*.f64 phi2 (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1))))))
(fma.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1) (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)))
(fma.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))))
(cos.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)))
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (*.f64 (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 3 binary64))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (+.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal -2 binary64))
(/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(neg.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal -2 binary64)))
(-.f64 (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (+.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))) (+.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))))
(/.f64 (-.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (+.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64))))
(-.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 lambda1))) (*.f64 (sin.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (+.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (+.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))))
(-.f64 (/.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 3 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (+.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 3 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (+.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)))))
(-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(*.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64)) (/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64)))
(*.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))) (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(neg.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 phi1))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (*.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
#s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (sin.f64 phi1))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (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 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (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 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))))
(-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.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 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (sin.f64 phi1) (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (sin.f64 phi1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (neg.f64 (-.f64 lambda2 lambda1)))) (sin.f64 (+.f64 (neg.f64 phi1) (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (neg.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 (neg.f64 phi1) (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (neg.f64 phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 (neg.f64 phi1) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (neg.f64 (-.f64 lambda2 lambda1)))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (neg.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1))) (cos.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1))) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (neg.f64 phi1) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (neg.f64 phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (PI.f64) phi1) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (PI.f64) phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda2 lambda1)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (sin.f64 phi1))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (neg.f64 (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (neg.f64 (sin.f64 phi1))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 lambda2) (*.f64 (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))))
(cos.f64 (neg.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))
(cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)))
#s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64))))
(*.f64 (sin.f64 phi1) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64))) #s(literal 2 binary64))
(/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (fma.f64 (pow.f64 (*.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))))) (*.f64 (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 (*.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2))))
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 phi1) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (-.f64 lambda2 lambda1)))) (sin.f64 (+.f64 phi1 (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 phi1 (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 phi1 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 phi1 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) #s(literal 2 binary64)))

eval237.0ms (0.9%)

Memory
-18.2MiB live, 351.0MiB allocated
Compiler

Compiled 64 937 to 5 007 computations (92.3% saved)

prune226.0ms (0.9%)

Memory
42.4MiB live, 321.3MiB allocated
Pruning

121 alts after pruning (121 fresh and 0 done)

PrunedKeptTotal
New983721 055
Fresh224971
Picked505
Done000
Total1 0101211 131
Accuracy
99.9%
Counts
1 131 → 121
Alt Table
Click to see full alt table
StatusAccuracyProgram
25.8%
(atan2.f64 (/.f64 (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
13.1%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1))))
14.0%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
14.9%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
25.9%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
20.6%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
19.2%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
25.8%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
14.0%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
17.8%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
18.9%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
17.8%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) #s(approx (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
19.0%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) #s(approx (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.9%
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
24.1%
(atan2.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
77.5%
(atan2.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
74.4%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
17.3%
(atan2.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
99.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))))
89.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))))
75.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
74.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
76.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))))
73.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
82.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
86.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
86.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))))
81.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))))
52.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
66.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1)))))))
46.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64))))))
66.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))))))
66.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1))))))
66.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1))))))
66.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (sin.f64 phi1))))))
59.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))) (sin.f64 phi1))))))
50.8%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1))))))
50.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1))))))
44.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))) (sin.f64 phi1))))))
50.1%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (*.f64 #s(literal 1 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (sin.f64 phi1))))))
54.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1))))))
55.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (sin.f64 phi1))))))
46.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1))))))
63.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
61.5%
(atan2.f64 (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.4%
(atan2.f64 (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
62.1%
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1)) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
58.8%
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1)) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
61.9%
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) (*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda1)) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
70.4%
(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))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
78.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
71.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
78.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
54.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))))
69.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 #s(approx (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
72.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
66.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
53.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))))
52.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
49.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))))) phi1))))
53.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
69.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
69.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))))))
60.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
60.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
64.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
65.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
53.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (sin phi1) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1)))))
51.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (sin phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1)))))
28.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))))
32.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1))) (cos.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1)))) #s(literal 2 binary64))))
16.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))))
16.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))))
28.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))))
41.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))))
19.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))))
51.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (-.f64 (sin.f64 phi2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))))))
49.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
49.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))))
41.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
41.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
42.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (*.f64 #s(literal 1 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))))
42.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
45.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
45.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
32.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) (*.f64 phi1 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) phi1))))
34.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) phi1))))
33.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
42.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (sin.f64 phi1)))))))
17.6%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (-.f64 lambda1 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
62.1%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
58.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
42.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
61.5%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
60.9%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
43.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.1%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
41.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
32.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
27.3%
(atan2.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
27.1%
(atan2.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
23.6%
(atan2.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
78.7%
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
62.0%
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
46.1%
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
56.1%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda2)))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
56.2%
(atan2.f64 (*.f64 #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)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
43.4%
(atan2.f64 (*.f64 #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)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
52.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
40.0%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.3%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
16.0%
(atan2.f64 #s(approx (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.5%
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
36.0%
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
45.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
32.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
48.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 #s(approx (* (sin (- lambda1 lambda2)) (+ (* 1/24 (* phi2 phi2)) -1/2)) (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (sin.f64 lambda1))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
48.6%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
14.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (+ (* (* (sin (- lambda1 lambda2)) (+ (* 1/24 (* phi2 phi2)) -1/2)) (* phi2 phi2)) (sin (- lambda1 lambda2))) (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 4 binary64))) (sin.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
Compiler

Compiled 12 430 to 8 006 computations (35.6% saved)

simplify142.0ms (0.5%)

Memory
-27.8MiB live, 70.1MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)
cost-diff0
(*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
cost-diff3
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
cost-diff0
#s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
cost-diff0
(-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))
cost-diff0
(/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64))
cost-diff0
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(-.f64 lambda1 lambda2)
cost-diff0
(sin.f64 (-.f64 lambda1 lambda2))
cost-diff0
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff0
(-.f64 lambda1 lambda2)
cost-diff0
(sin.f64 (-.f64 lambda1 lambda2))
cost-diff0
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff0
(sin.f64 lambda2)
cost-diff0
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
cost-diff0
(*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
094847
0147847
1283847
2634806
31705806
44440806
08092804
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 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)
lambda1
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
#s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(neg.f64 phi1)
phi1
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi2) phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64))
(-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))
#s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
(cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))
(-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))
lambda1
(fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)
(PI.f64)
#s(literal 1/2 binary64)
lambda2
#s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)
(fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)
phi2
#s(literal 2 binary64)
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
lambda2
lambda1
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
(sin.f64 lambda1)
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda1)
(cos.f64 lambda2)
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(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)
lambda1
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(sin.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
#s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1))))
#s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)))
(*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1))
(neg.f64 phi1)
phi1
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi2) phi1)
(*.f64 phi1 (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64))
(-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))
(-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))
#s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
#s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2))))
(cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))
(cos.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))
(-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))
(fma.f64 #s(literal -1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2))
lambda1
(fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)
(fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)
(PI.f64)
#s(literal 1/2 binary64)
lambda2
#s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)
(fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)
phi2
#s(literal 2 binary64)
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (neg.f64 (cos.f64 phi2))) (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2))
(*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (neg.f64 (cos.f64 phi2)))
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(neg.f64 (sin.f64 (-.f64 lambda2 lambda1)))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
lambda2
lambda1
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
(sin.f64 lambda1)
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda1)
(cos.f64 lambda2)

localize1.1s (4.3%)

Memory
46.7MiB live, 986.9MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.1328125
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
accuracy0.16015625
(*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2))
accuracy0.236660009768442
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
accuracy56.13291982850229
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
accuracy31.166163425851558
#s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
accuracy32.66945630217299
#s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
accuracy55.321095460504395
(cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))
accuracy56.13291982850229
(cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))
accuracy0.240566259768442
(*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy14.628299870939717
(cos.f64 (-.f64 lambda1 lambda2))
accuracy14.85225978126673
(sin.f64 (-.f64 lambda1 lambda2))
accuracy27.410698658217818
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy14.628299870939717
(cos.f64 (-.f64 lambda1 lambda2))
accuracy14.85225978126673
(sin.f64 (-.f64 lambda1 lambda2))
accuracy27.41115750556727
#s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy37.84489830862307
#s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy0.13119125976844204
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
accuracy0.1328125
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
accuracy0.16015625
(*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
accuracy0.236660009768442
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
Samples
899.0ms235×1valid
117.0ms19×2valid
22.0ms0valid
Compiler

Compiled 730 to 83 computations (88.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 942.0ms
ival-cos: 339.0ms (36% of total)
ival-sin: 235.0ms (25% of total)
adjust: 119.0ms (12.6% of total)
ival-mult: 77.0ms (8.2% of total)
ival-sub: 52.0ms (5.5% of total)
ival-pi: 50.0ms (5.3% of total)
ival-atan2: 28.0ms (3% of total)
ival-add: 27.0ms (2.9% of total)
ival-div: 10.0ms (1.1% of total)
ival-neg: 5.0ms (0.5% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series115.0ms (0.4%)

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

12 calls:

TimeVariablePointExpression
26.0ms
lambda2
@-inf
((atan2 (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (cos phi2)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (atan2 (* (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (cos phi2)) (- (+ (/ (PI) 2) lambda2) lambda1) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (sin phi1) (cos phi2)) (* (cos phi1) (sin phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (cos phi2) phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos (- (+ (* 1/2 (PI)) phi2) lambda2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))))
22.0ms
phi2
@-inf
((atan2 (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (cos phi2)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (atan2 (* (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (cos phi2)) (- (+ (/ (PI) 2) lambda2) lambda1) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (sin phi1) (cos phi2)) (* (cos phi1) (sin phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (cos phi2) phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos (- (+ (* 1/2 (PI)) phi2) lambda2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))))
17.0ms
lambda1
@inf
((atan2 (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (cos phi2)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (atan2 (* (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (cos phi2)) (- (+ (/ (PI) 2) lambda2) lambda1) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (sin phi1) (cos phi2)) (* (cos phi1) (sin phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (cos phi2) phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos (- (+ (* 1/2 (PI)) phi2) lambda2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))))
7.0ms
phi2
@inf
((atan2 (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (cos phi2)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (atan2 (* (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (cos phi2)) (- (+ (/ (PI) 2) lambda2) lambda1) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (sin phi1) (cos phi2)) (* (cos phi1) (sin phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (cos phi2) phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos (- (+ (* 1/2 (PI)) phi2) lambda2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))))
7.0ms
lambda1
@-inf
((atan2 (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (cos phi2)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2 (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) 2) (- (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2))))) (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (atan2 (* (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos (- (+ (/ (PI) 2) lambda2) lambda1)) (cos phi2)) (- (+ (/ (PI) 2) lambda2) lambda1) (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (* (sin phi1) (cos phi2)) (* (cos phi1) (sin phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (cos phi2) phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos (- (+ (* 1/2 (PI)) phi2) lambda2)) (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))))

simplify239.0ms (0.9%)

Memory
6.6MiB live, 236.7MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
011797233
143647194
087856610
Stop Event
iter limit
node limit
Counts
296 → 294
Calls
Call 1
Inputs
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (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)))))
(* -1 (sin lambda2))
(+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(* -1 lambda2)
(- lambda1 lambda2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* 1/2 (- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))
(+ (* 1/2 (* lambda1 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(+ (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (* 1/2 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))))
(+ (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (* lambda1 (+ (* 1/2 (* lambda1 (- (* -1/6 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (* 1/2 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))))))))
(- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (+ (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* lambda1 (- (* -1/6 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1 (* lambda1 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(cos (+ lambda2 (* 1/2 (PI))))
(+ (cos (+ lambda2 (* 1/2 (PI)))) (* lambda1 (sin (+ lambda2 (* 1/2 (PI))))))
(+ (cos (+ lambda2 (* 1/2 (PI)))) (* lambda1 (- (* -1/2 (* lambda1 (cos (+ lambda2 (* 1/2 (PI)))))) (* -1 (sin (+ lambda2 (* 1/2 (PI))))))))
(+ (cos (+ lambda2 (* 1/2 (PI)))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (+ lambda2 (* 1/2 (PI))))) (* -1/6 (* lambda1 (sin (+ lambda2 (* 1/2 (PI)))))))) (* -1 (sin (+ lambda2 (* 1/2 (PI))))))))
(atan2 (* (cos phi2) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (cos (+ lambda2 (* 1/2 (PI)))))
(+ (* lambda1 (* (cos phi2) (sin (+ lambda2 (* 1/2 (PI)))))) (* (cos phi2) (cos (+ lambda2 (* 1/2 (PI))))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (cos (+ lambda2 (* 1/2 (PI))))))) (* (cos phi2) (sin (+ lambda2 (* 1/2 (PI))))))) (* (cos phi2) (cos (+ lambda2 (* 1/2 (PI))))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (+ lambda2 (* 1/2 (PI)))))) (* -1/6 (* lambda1 (* (cos phi2) (sin (+ lambda2 (* 1/2 (PI))))))))) (* (cos phi2) (sin (+ lambda2 (* 1/2 (PI))))))) (* (cos phi2) (cos (+ lambda2 (* 1/2 (PI))))))
(+ lambda2 (* 1/2 (PI)))
(+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* -1/2 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda1 (- (* 1/4 (* lambda1 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(* -1 (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (* (sin phi1) (sin (neg lambda2)))))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos (neg lambda2)) (sin phi1)))) (* (sin phi1) (sin (neg lambda2))))))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (sin phi1) (sin (neg lambda2))))) (* 1/2 (* (cos (neg lambda2)) (sin phi1))))) (* (sin phi1) (sin (neg lambda2))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(* phi1 (* (cos phi2) (cos (neg lambda2))))
(+ (* -1 (* lambda1 (* phi1 (* (cos phi2) (sin (neg lambda2)))))) (* phi1 (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* phi1 (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* phi1 (* (cos phi2) (cos (neg lambda2)))))))) (* phi1 (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* phi1 (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* phi1 (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* phi1 (* (cos phi2) (sin (neg lambda2)))))))))) (* phi1 (* (cos phi2) (cos (neg lambda2)))))
(cos (neg (+ lambda2 (* 1/2 (PI)))))
(+ (cos (neg (+ lambda2 (* 1/2 (PI))))) (* -1 (* lambda1 (sin (neg (+ lambda2 (* 1/2 (PI))))))))
(+ (cos (neg (+ lambda2 (* 1/2 (PI))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg (+ lambda2 (* 1/2 (PI))))))) (sin (neg (+ lambda2 (* 1/2 (PI))))))))
(+ (cos (neg (+ lambda2 (* 1/2 (PI))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg (+ lambda2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (sin (neg (+ lambda2 (* 1/2 (PI))))))))) (sin (neg (+ lambda2 (* 1/2 (PI))))))))
(cos (- (+ phi2 (* 1/2 (PI))) lambda2))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))) (* 1/6 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* 1/2 (- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))))
(- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))
(cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI))))))
(cos (- (+ lambda2 (* 1/2 (PI))) lambda1))
(* (cos phi2) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))
(* -1 lambda1)
(* lambda1 (- (+ (* 1/2 (/ (PI) lambda1)) (/ lambda2 lambda1)) 1))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))
(cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))))
(- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))
(cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))))
(cos (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))
(atan2 (* (cos phi2) (cos (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (cos (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))
(* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* 1/2 (PI))) lambda1)))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* phi1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(cos (neg (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))
(cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
lambda2
(* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))
(* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))
(* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))
(+ lambda1 (* -1 lambda2))
(* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
(+ (* 1/2 (* lambda2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))
(+ (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))))
(+ (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* lambda2 (+ (* 1/2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* 1/6 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))))))
(- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (+ (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (+ (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (+ (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (* 1/6 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(cos (- lambda1 (+ phi2 (* 1/2 (PI)))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1/2 (* lambda2 (cos (- lambda1 (+ phi2 (* 1/2 (PI))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))
(cos (- (* 1/2 (PI)) lambda1))
(+ (cos (- (* 1/2 (PI)) lambda1)) (* -1 (* lambda2 (sin (- (* 1/2 (PI)) lambda1)))))
(+ (cos (- (* 1/2 (PI)) lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (- (* 1/2 (PI)) lambda1)))) (sin (- (* 1/2 (PI)) lambda1)))))
(+ (cos (- (* 1/2 (PI)) lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- (* 1/2 (PI)) lambda1))) (* 1/6 (* lambda2 (sin (- (* 1/2 (PI)) lambda1)))))) (sin (- (* 1/2 (PI)) lambda1)))))
(* (cos phi2) (cos (- (* 1/2 (PI)) lambda1)))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda1))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (- (* 1/2 (PI)) lambda1))))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (- (* 1/2 (PI)) lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda1))))))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda1))))
(- (* 1/2 (PI)) lambda1)
(- (+ lambda2 (* 1/2 (PI))) lambda1)
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* 1/2 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda2 (- (* 1/4 (* lambda2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(* -1 (* (cos lambda1) (sin phi1)))
(+ (* -1 (* lambda2 (* (sin lambda1) (sin phi1)))) (* -1 (* (cos lambda1) (sin phi1))))
(+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* 1/2 (* lambda2 (* (cos lambda1) (sin phi1)))))))
(+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* lambda2 (+ (* 1/6 (* lambda2 (* (sin lambda1) (sin phi1)))) (* 1/2 (* (cos lambda1) (sin phi1))))))))
(cos lambda1)
(+ (cos lambda1) (* 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)))))
(* phi1 (* (cos lambda1) (cos phi2)))
(+ (* lambda2 (* phi1 (* (cos phi2) (sin lambda1)))) (* phi1 (* (cos lambda1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* phi1 (* (cos lambda1) (cos phi2))))) (* phi1 (* (cos phi2) (sin lambda1))))) (* phi1 (* (cos lambda1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* phi1 (* (cos lambda1) (cos phi2)))) (* -1/6 (* lambda2 (* phi1 (* (cos phi2) (sin lambda1))))))) (* phi1 (* (cos phi2) (sin lambda1))))) (* phi1 (* (cos lambda1) (cos phi2))))
(cos (- lambda1 (* 1/2 (PI))))
(+ (cos (- lambda1 (* 1/2 (PI)))) (* lambda2 (sin (- lambda1 (* 1/2 (PI))))))
(+ (cos (- lambda1 (* 1/2 (PI)))) (* lambda2 (- (* -1/2 (* lambda2 (cos (- lambda1 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (* 1/2 (PI))))))))
(+ (cos (- lambda1 (* 1/2 (PI)))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- lambda1 (* 1/2 (PI))))) (* -1/6 (* lambda2 (sin (- lambda1 (* 1/2 (PI)))))))) (* -1 (sin (- lambda1 (* 1/2 (PI))))))))
(cos (+ phi2 (* 1/2 (PI))))
(+ (cos (+ phi2 (* 1/2 (PI)))) (* lambda2 (sin (+ phi2 (* 1/2 (PI))))))
(+ (cos (+ phi2 (* 1/2 (PI)))) (* lambda2 (- (* -1/2 (* lambda2 (cos (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (+ phi2 (* 1/2 (PI))))))))
(+ (cos (+ phi2 (* 1/2 (PI)))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (+ phi2 (* 1/2 (PI))))) (* -1/6 (* lambda2 (sin (+ phi2 (* 1/2 (PI)))))))) (* -1 (sin (+ phi2 (* 1/2 (PI))))))))
(cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1/2 (* lambda2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))
(sin lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (+ 1 (* 1/2 (/ (PI) lambda2))) (/ lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* 1/2 (- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* 1/2 (- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))))
(- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))
(cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI)))))
(cos (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))
(atan2 (* (cos phi2) (cos (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (cos (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2)))))
(* -1 (* lambda2 (- (* -1 (/ (- (* 1/2 (PI)) lambda1) lambda2)) 1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* phi1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(cos (- (+ lambda1 (* -1 lambda2)) (* 1/2 (PI))))
(cos (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))
(cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))
(* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(* phi1 (cos phi2))
(* phi1 (+ (cos phi2) (* -1/6 (* (pow phi1 2) (cos phi2)))))
(* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* 1/120 (* (pow phi1 2) (cos phi2)))))))
(* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos phi2))) (* 1/120 (cos phi2))))))))
(sin phi2)
(+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))
(- (sin phi2) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(- (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (* -1/2 (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (+ (* -1/2 (sin phi2)) (* -1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(* -1 (* phi1 (cos (- lambda1 lambda2))))
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* 1/6 (* (pow phi1 2) (cos (- lambda1 lambda2))))))
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/6 (cos (- lambda1 lambda2)))))))
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* 1/6 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (cos (- lambda1 lambda2))) (* 1/5040 (* (pow phi1 2) (cos (- lambda1 lambda2))))))))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(* (cos phi2) (sin phi1))
(* (cos phi1) (sin phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(+ (sin (- 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/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))
(+ (* 1/2 (* phi2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(+ (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* 1/2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))))
(+ (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* phi2 (+ (* 1/2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))
(- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (+ (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* phi2 (- (* -1/6 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (* -1/2 (* phi2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/6 (* phi2 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))
(+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* -1/2 (* (pow phi2 2) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))
(+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* 1/24 (* (pow phi2 2) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
(+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* 1/24 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
(* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(sin phi1)
(+ (sin phi1) (* -1/2 (* (pow phi2 2) (sin phi1))))
(+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow phi2 2) (sin phi1))))))
(+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin phi1))) (* 1/24 (sin phi1)))))))
(* phi2 (cos phi1))
(* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(* -1 (* (cos (- lambda2 lambda1)) (sin phi1)))
(- (* phi2 (- (cos phi1) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(- (* phi2 (- (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (sin phi1))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(- (* phi2 (- (+ (cos phi1) (* phi2 (- (* phi2 (- (* -1/6 (cos phi1)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1))))))) (* -1/2 (* (cos (- lambda2 lambda1)) (sin phi1)))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(* (cos (- lambda1 lambda2)) (sin phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(* phi1 (cos (- lambda1 lambda2)))
(+ (* -1/2 (* phi1 (* (pow phi2 2) (cos (- lambda1 lambda2))))) (* phi1 (cos (- lambda1 lambda2))))
(+ (* phi1 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* phi1 (cos (- lambda1 lambda2)))) (* 1/24 (* phi1 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (* phi1 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* phi1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* phi1 (* (pow phi2 2) (cos (- lambda1 lambda2))))) (* 1/24 (* phi1 (cos (- lambda1 lambda2)))))))))
(cos (- (* 1/2 (PI)) lambda2))
(+ (cos (- (* 1/2 (PI)) lambda2)) (* -1 (* phi2 (sin (- (* 1/2 (PI)) lambda2)))))
(+ (cos (- (* 1/2 (PI)) lambda2)) (* phi2 (- (* -1/2 (* phi2 (cos (- (* 1/2 (PI)) lambda2)))) (sin (- (* 1/2 (PI)) lambda2)))))
(+ (cos (- (* 1/2 (PI)) lambda2)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- (* 1/2 (PI)) lambda2))) (* 1/6 (* phi2 (sin (- (* 1/2 (PI)) lambda2)))))) (sin (- (* 1/2 (PI)) lambda2)))))
(cos (- (+ lambda1 (* 1/2 (PI))) lambda2))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* -1/2 (* phi2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(atan2 (* 1/2 (- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/2 (- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))))
(- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))))
(cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI)))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(cos (- (* 1/2 (PI)) (+ lambda2 (* -1 phi2))))
(cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))
Outputs
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))))
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* -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 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (sin.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)))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 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))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* 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/6 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda2)))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(atan2 (* 1/2 (- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (-.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1) lambda2))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))
(*.f64 (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda1 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))))
(+ (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (* 1/2 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))))) lambda1 (*.f64 (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (* lambda1 (+ (* 1/2 (* lambda1 (- (* -1/6 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (* 1/2 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))) lambda1 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))))) lambda1 (*.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 1/2 binary64))) lambda1 (*.f64 (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 1/2 binary64)))
(- (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(- (+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (+ (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* lambda1 (- (* -1/6 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))) lambda1 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))) lambda1 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))
(cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1 (* lambda1 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(+ (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg (+ lambda2 (+ phi2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))) (sin (neg (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (*.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) #s(literal -1/2 binary64))) lambda1) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) lambda1 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(cos (+ lambda2 (* 1/2 (PI))))
(cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))
(+ (cos (+ lambda2 (* 1/2 (PI)))) (* lambda1 (sin (+ lambda2 (* 1/2 (PI))))))
(fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) lambda1 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(+ (cos (+ lambda2 (* 1/2 (PI)))) (* lambda1 (- (* -1/2 (* lambda1 (cos (+ lambda2 (* 1/2 (PI)))))) (* -1 (sin (+ lambda2 (* 1/2 (PI))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (neg.f64 lambda2)))) lambda1 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(+ (cos (+ lambda2 (* 1/2 (PI)))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (+ lambda2 (* 1/2 (PI))))) (* -1/6 (* lambda1 (sin (+ lambda2 (* 1/2 (PI)))))))) (* -1 (sin (+ lambda2 (* 1/2 (PI))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) #s(literal -1/2 binary64))) lambda1 (*.f64 #s(literal 1 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) lambda1 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(atan2 (* (cos phi2) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))))
(* (cos phi2) (cos (+ lambda2 (* 1/2 (PI)))))
(*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (sin (+ lambda2 (* 1/2 (PI)))))) (* (cos phi2) (cos (+ lambda2 (* 1/2 (PI))))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (cos (+ lambda2 (* 1/2 (PI))))))) (* (cos phi2) (sin (+ lambda2 (* 1/2 (PI))))))) (* (cos phi2) (cos (+ lambda2 (* 1/2 (PI))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (+ lambda2 (* 1/2 (PI)))))) (* -1/6 (* lambda1 (* (cos phi2) (sin (+ lambda2 (* 1/2 (PI))))))))) (* (cos phi2) (sin (+ lambda2 (* 1/2 (PI))))))) (* (cos phi2) (cos (+ lambda2 (* 1/2 (PI))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) lambda1 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 phi2)))
(+ lambda2 (* 1/2 (PI)))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)
(+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1)) lambda2)
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(- (+ (* -1/2 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (sin.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(- (+ (* lambda1 (- (* 1/4 (* lambda1 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) lambda1) (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda1 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(- (+ (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* 1/2 (* (sin lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda2) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/12 binary64) lambda1) (*.f64 (sin.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda1 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda1 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(* -1 (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda2))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (* (sin phi1) (sin (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (sin.f64 phi1)) (neg.f64 (sin.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda2)))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos (neg lambda2)) (sin phi1)))) (* (sin phi1) (sin (neg lambda2))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1))) lambda1))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (sin phi1) (sin (neg lambda2))))) (* 1/2 (* (cos (neg lambda2)) (sin phi1))))) (* (sin phi1) (sin (neg lambda2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)) (sin.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1))) lambda1 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda2)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (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) (*.f64 #s(literal 1 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 (*.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (neg.f64 lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))) lambda1)) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
(* phi1 (* (cos phi2) (cos (neg lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 lambda2))
(+ (* -1 (* lambda1 (* phi1 (* (cos phi2) (sin (neg lambda2)))))) (* phi1 (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 lambda2) (*.f64 (neg.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi2) phi1) (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* -1 (* phi1 (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* phi1 (* (cos phi2) (cos (neg lambda2)))))))) (* phi1 (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 lambda2)) (*.f64 (neg.f64 phi1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* phi1 (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* phi1 (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* phi1 (* (cos phi2) (sin (neg lambda2)))))))))) (* phi1 (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) phi1)) (neg.f64 (sin.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (cos.f64 phi2) phi1) (neg.f64 (sin.f64 lambda2))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1)) lambda1 (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 lambda2)))
(cos (neg (+ lambda2 (* 1/2 (PI)))))
(cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))
(+ (cos (neg (+ lambda2 (* 1/2 (PI))))) (* -1 (* lambda1 (sin (neg (+ lambda2 (* 1/2 (PI))))))))
(fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) lambda1 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(+ (cos (neg (+ lambda2 (* 1/2 (PI))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg (+ lambda2 (* 1/2 (PI))))))) (sin (neg (+ lambda2 (* 1/2 (PI))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (neg.f64 lambda2)))) lambda1 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(+ (cos (neg (+ lambda2 (* 1/2 (PI))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg (+ lambda2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (sin (neg (+ lambda2 (* 1/2 (PI))))))))) (sin (neg (+ lambda2 (* 1/2 (PI))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (neg.f64 lambda2))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) #s(literal -1/2 binary64))) lambda1 (*.f64 #s(literal 1 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) lambda1 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(cos (- (+ phi2 (* 1/2 (PI))) lambda2))
(cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(fma.f64 (neg.f64 lambda1) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) lambda1 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))) (* 1/6 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (*.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) #s(literal -1/2 binary64))) lambda1) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) lambda1 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64) #s(literal 1 binary64)) lambda1)
(* 1/2 (- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (-.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1) lambda2))) #s(literal 1/2 binary64))
(- (cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))
(-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (cos.f64 (-.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1) lambda2)))
(cos (- lambda1 (+ lambda2 (+ phi2 (* 1/2 (PI))))))
(cos.f64 (-.f64 lambda1 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(cos (- (+ lambda2 (* 1/2 (PI))) lambda1))
(cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1))
(* (cos phi2) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))
(*.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)) (cos.f64 phi2))
(* -1 lambda1)
(neg.f64 lambda1)
(* lambda1 (- (+ (* 1/2 (/ (PI) lambda1)) (/ lambda2 lambda1)) 1))
(*.f64 (-.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1) #s(literal 1 binary64)) lambda1)
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))
(cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(cos (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))
(cos.f64 (-.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1) lambda2))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))) (cos.f64 phi2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(atan2 (* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1)))) (cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2) (neg.f64 lambda1)))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(* 1/2 (- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1)))) (cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2) (neg.f64 lambda1)))) #s(literal 1/2 binary64))
(- (cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))) (cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))
(-.f64 (cos.f64 (+.f64 (+.f64 lambda2 phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1)))) (cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2) (neg.f64 lambda1))))
(cos (neg (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))))
(cos.f64 (+.f64 (+.f64 lambda2 phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1))))
(cos (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))
(cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1)) lambda2))
(atan2 (* (cos phi2) (cos (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1)) lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))))
(* (cos phi2) (cos (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))
(*.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1)) lambda2)) (cos.f64 phi2))
(* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* 1/2 (PI))) lambda1)))))
(*.f64 (neg.f64 lambda1) (fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1) #s(literal -1 binary64) #s(literal 1 binary64)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* phi1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)))
(cos (neg (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))
(cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda1)) lambda2))
(cos (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2) (neg.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 (*.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 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
lambda2
(* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))
(*.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda2)
(* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))
(*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))
(*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64)) (*.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)
(+ lambda1 (* -1 lambda2))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))))
(+ (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))) lambda2 (-.f64 (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) lambda2 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* lambda2 (+ (* 1/2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* 1/6 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))))) lambda2 (*.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) #s(literal 1/2 binary64))) lambda2 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) #s(literal 1/2 binary64)))
(- (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(-.f64 (fma.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (+ (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(-.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))) lambda2 (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(- (+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (+ (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (+ (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (- (* 1/6 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))
(-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))))) lambda2 (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(cos (- lambda1 (+ phi2 (* 1/2 (PI)))))
(cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))
(fma.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1/2 (* lambda2 (cos (- lambda1 (+ phi2 (* 1/2 (PI))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))
(+ (cos (- lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (sin (- lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) #s(literal -1/2 binary64))) lambda2 (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) lambda2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))
(cos (- (* 1/2 (PI)) lambda1))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))
(+ (cos (- (* 1/2 (PI)) lambda1)) (* -1 (* lambda2 (sin (- (* 1/2 (PI)) lambda1)))))
(fma.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (neg.f64 lambda2) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))
(+ (cos (- (* 1/2 (PI)) lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (- (* 1/2 (PI)) lambda1)))) (sin (- (* 1/2 (PI)) lambda1)))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))) lambda2 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))
(+ (cos (- (* 1/2 (PI)) lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- (* 1/2 (PI)) lambda1))) (* 1/6 (* lambda2 (sin (- (* 1/2 (PI)) lambda1)))))) (sin (- (* 1/2 (PI)) lambda1)))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) #s(literal -1/2 binary64))) lambda2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))) lambda2 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))
(* (cos phi2) (cos (- (* 1/2 (PI)) lambda1)))
(*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda1))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda1))))
(fma.f64 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (- (* 1/2 (PI)) lambda1))))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))) lambda2 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (- (* 1/2 (PI)) lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda1))))))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda1))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))) lambda2)) lambda2 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (cos.f64 phi2)))
(- (* 1/2 (PI)) lambda1)
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)
(- (+ lambda2 (* 1/2 (PI))) lambda1)
(-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) lambda2 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(- (+ (* lambda2 (- (* 1/4 (* lambda2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda2 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(- (+ (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* -1/2 (* (sin (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/12 binary64) lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda2 (*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))) lambda2 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(* -1 (* (cos lambda1) (sin phi1)))
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 phi1))
(+ (* -1 (* lambda2 (* (sin lambda1) (sin phi1)))) (* -1 (* (cos lambda1) (sin phi1))))
(neg.f64 (fma.f64 (cos.f64 lambda1) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) lambda2) (sin.f64 phi1))))
(+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* 1/2 (* lambda2 (* (cos lambda1) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 phi1))) lambda2))
(+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* lambda2 (+ (* 1/6 (* lambda2 (* (sin lambda1) (sin phi1)))) (* 1/2 (* (cos lambda1) (sin phi1))))))))
(fma.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (sin.f64 phi1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) lambda2)) lambda2 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.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 #s(literal -1/2 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1 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 (*.f64 #s(literal 1 binary64) (sin.f64 lambda1))) lambda2 (cos.f64 lambda1))
(* phi1 (* (cos lambda1) (cos phi2)))
(*.f64 (*.f64 phi1 (cos.f64 lambda1)) (cos.f64 phi2))
(+ (* lambda2 (* phi1 (* (cos phi2) (sin lambda1)))) (* phi1 (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 phi1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 phi1 (cos.f64 lambda1)) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* phi1 (* (cos lambda1) (cos phi2))))) (* phi1 (* (cos phi2) (sin lambda1))))) (* phi1 (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 phi1 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) phi1) (sin.f64 lambda1))) lambda2 (*.f64 (*.f64 phi1 (cos.f64 lambda1)) (cos.f64 phi2)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* phi1 (* (cos lambda1) (cos phi2)))) (* -1/6 (* lambda2 (* phi1 (* (cos phi2) (sin lambda1))))))) (* phi1 (* (cos phi2) (sin lambda1))))) (* phi1 (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (cos.f64 phi2) phi1) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) phi1) (sin.f64 lambda1))) lambda2 (*.f64 (*.f64 phi1 (cos.f64 lambda1)) (cos.f64 phi2)))
(cos (- lambda1 (* 1/2 (PI))))
(cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+ (cos (- lambda1 (* 1/2 (PI)))) (* lambda2 (sin (- lambda1 (* 1/2 (PI))))))
(fma.f64 (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2 (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+ (cos (- lambda1 (* 1/2 (PI)))) (* lambda2 (- (* -1/2 (* lambda2 (cos (- lambda1 (* 1/2 (PI)))))) (* -1 (sin (- lambda1 (* 1/2 (PI))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (neg.f64 (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) lambda2 (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+ (cos (- lambda1 (* 1/2 (PI)))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- lambda1 (* 1/2 (PI))))) (* -1/6 (* lambda2 (sin (- lambda1 (* 1/2 (PI)))))))) (* -1 (sin (- lambda1 (* 1/2 (PI))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1/2 binary64))) lambda2 (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) lambda2 (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos (+ phi2 (* 1/2 (PI))))
(cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))
(+ (cos (+ phi2 (* 1/2 (PI)))) (* lambda2 (sin (+ phi2 (* 1/2 (PI))))))
(fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) lambda2 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))
(+ (cos (+ phi2 (* 1/2 (PI)))) (* lambda2 (- (* -1/2 (* lambda2 (cos (+ phi2 (* 1/2 (PI)))))) (* -1 (sin (+ phi2 (* 1/2 (PI))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (neg.f64 phi2)))) lambda2 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))
(+ (cos (+ phi2 (* 1/2 (PI)))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (+ phi2 (* 1/2 (PI))))) (* -1/6 (* lambda2 (sin (+ phi2 (* 1/2 (PI)))))))) (* -1 (sin (+ phi2 (* 1/2 (PI))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) #s(literal -1/2 binary64))) lambda2 (*.f64 #s(literal 1 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) lambda2 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))
(cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))
(cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
(fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)) lambda2 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* -1/2 (* lambda2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))) (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) (neg.f64 (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))) lambda2 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(+ (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* -1 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)) (*.f64 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)) #s(literal -1/2 binary64))) lambda2 (*.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))) lambda2 (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)))
(sin lambda2)
(sin.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (+ 1 (* 1/2 (/ (PI) lambda2))) (/ lambda1 lambda2)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1) lambda2)) lambda2)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 lambda2))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
(atan2 (* 1/2 (- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda2)) phi2) lambda1))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
(* 1/2 (- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))))
(*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda2)) phi2) lambda1))) #s(literal 1/2 binary64))
(- (cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI))))) (cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))
(-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda2)) phi2) lambda1)))
(cos (- (+ lambda1 (* -1 lambda2)) (+ phi2 (* 1/2 (PI)))))
(cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))
(cos (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1) (neg.f64 lambda2)))
(atan2 (* (cos phi2) (cos (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))))
(* (cos phi2) (cos (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1) (neg.f64 lambda2))) (cos.f64 phi2))
(* -1 (* lambda2 (- (* -1 (/ (- (* 1/2 (PI)) lambda1) lambda2)) 1)))
(*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1) (neg.f64 lambda2)) #s(literal 1 binary64)) (neg.f64 lambda2))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* phi1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)))
(cos (- (+ lambda1 (* -1 lambda2)) (* 1/2 (PI))))
(cos.f64 (+.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (neg.f64 lambda2))))
(cos (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))
(cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda2)) phi2))
(cos (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))
(cos.f64 (+.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 lambda2)) phi2) lambda1))
(* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/120 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) phi1)
(* phi1 (cos phi2))
(*.f64 (cos.f64 phi2) phi1)
(* phi1 (+ (cos phi2) (* -1/6 (* (pow phi1 2) (cos phi2)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (cos.f64 phi2) (cos.f64 phi2)) phi1)
(* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* 1/120 (* (pow phi1 2) (cos phi2)))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (cos.f64 phi2) (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2))) (*.f64 phi1 phi1) (cos.f64 phi2)) phi1)
(* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos phi2))) (* 1/120 (cos phi2))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1)) (cos.f64 phi2) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi2))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2))) (*.f64 phi1 phi1) (cos.f64 phi2)) phi1)
(sin phi2)
(sin.f64 phi2)
(+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)) (sin.f64 phi2) (sin.f64 phi2))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) (*.f64 phi1 phi1) (sin.f64 phi2))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1)) (sin.f64 phi2) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi2))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) (*.f64 phi1 phi1) (sin.f64 phi2))
(- (sin phi2) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(-.f64 (sin.f64 phi2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))))
(- (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (+.f64 (cos.f64 phi2) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (* -1/2 (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(+.f64 (sin.f64 phi2) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (cos.f64 phi2) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (+ (* -1/2 (sin phi2)) (* -1/2 (* phi1 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (sin (neg phi2))))))
(+.f64 (sin.f64 phi2) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 phi2) (*.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (+.f64 (cos.f64 phi2) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) phi1)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (cos.f64 phi2) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(* -1 (* phi1 (cos (- lambda1 lambda2))))
(*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* 1/6 (* (pow phi1 2) (cos (- lambda1 lambda2))))))
(*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/6 (cos (- lambda1 lambda2)))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) (*.f64 phi1 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* 1/6 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (cos (- lambda1 lambda2))) (* 1/5040 (* (pow phi1 2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/5040 binary64) (*.f64 phi1 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/120 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal 1/120 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(* (cos phi2) (sin phi1))
(*.f64 (cos.f64 phi2) (sin.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (fma.f64 #s(literal 1 binary64) phi1 (neg.f64 phi2)))) (cos.f64 (-.f64 lambda2 lambda1))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (fma.f64 #s(literal 1 binary64) phi1 (neg.f64 phi2)))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+ (* -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 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 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)))))))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi2 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 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))))))))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/24 binary64) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi2 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2)) (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 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* phi2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))))
(+ (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* 1/2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))) phi2 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))))) phi2 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* phi2 (+ (* 1/2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* 1/2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/6 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))))) phi2 (*.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) #s(literal 1/2 binary64))) phi2 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) #s(literal 1/2 binary64)))
(- (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))) phi2 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(- (+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (+ (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* phi2 (- (* -1/6 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))
(-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/6 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))))) phi2 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))
(fma.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (* -1/2 (* phi2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (neg.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))
(+ (cos (- lambda1 (+ lambda2 (* 1/2 (PI))))) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- lambda1 (+ lambda2 (* 1/2 (PI)))))) (* -1/6 (* phi2 (sin (- lambda1 (+ lambda2 (* 1/2 (PI))))))))) (* -1 (sin (- lambda1 (+ lambda2 (* 1/2 (PI)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) #s(literal -1/2 binary64))) phi2 (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) phi2 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))
(+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* -1/2 (* (pow phi2 2) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)))
(+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* 1/24 (* (pow phi2 2) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)) (*.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)))
(+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* 1/24 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)))
(* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal 1/24 binary64) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* -1/2 (* (pow phi2 2) (sin phi1))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (sin.f64 phi1) (sin.f64 phi1))
(+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow phi2 2) (sin phi1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) (*.f64 phi2 phi2) (sin.f64 phi1))
(+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin phi1))) (* 1/24 (sin phi1)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) (sin.f64 phi1) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi1))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) (*.f64 phi2 phi2) (sin.f64 phi1))
(* phi2 (cos phi1))
(*.f64 (cos.f64 phi1) phi2)
(* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) (cos.f64 phi1) (cos.f64 phi1)) phi2)
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2)) (cos.f64 phi1) (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1))) (*.f64 phi2 phi2) (cos.f64 phi1)) phi2)
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2)) (cos.f64 phi1) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi1))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1))) (*.f64 phi2 phi2) (cos.f64 phi1)) phi2)
(* -1 (* (cos (- lambda2 lambda1)) (sin phi1)))
(*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))
(- (* phi2 (- (cos phi1) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(fma.f64 (-.f64 (cos.f64 phi1) (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64))) phi2 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))
(- (* phi2 (- (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (sin phi1))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64))) phi2 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))
(- (* phi2 (- (+ (cos phi1) (* phi2 (- (* phi2 (- (* -1/6 (cos phi1)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1))))))) (* -1/2 (* (cos (- lambda2 lambda1)) (sin phi1)))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda2 lambda1)) (sin phi1)))
(fma.f64 (+.f64 (cos.f64 phi1) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))) phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) phi2 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))
(* (cos (- lambda1 lambda2)) (sin phi1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(* phi1 (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1)
(+ (* -1/2 (* phi1 (* (pow phi2 2) (cos (- lambda1 lambda2))))) (* phi1 (cos (- lambda1 lambda2))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1))
(+ (* phi1 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* phi1 (cos (- lambda1 lambda2)))) (* 1/24 (* phi1 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) phi1) (*.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1))
(+ (* phi1 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* phi1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* phi1 (* (pow phi2 2) (cos (- lambda1 lambda2))))) (* 1/24 (* phi1 (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/720 binary64) phi1) (*.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1))
(cos (- (* 1/2 (PI)) lambda2))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))
(+ (cos (- (* 1/2 (PI)) lambda2)) (* -1 (* phi2 (sin (- (* 1/2 (PI)) lambda2)))))
(fma.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (neg.f64 phi2) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))
(+ (cos (- (* 1/2 (PI)) lambda2)) (* phi2 (- (* -1/2 (* phi2 (cos (- (* 1/2 (PI)) lambda2)))) (sin (- (* 1/2 (PI)) lambda2)))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) phi2 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))
(+ (cos (- (* 1/2 (PI)) lambda2)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- (* 1/2 (PI)) lambda2))) (* 1/6 (* phi2 (sin (- (* 1/2 (PI)) lambda2)))))) (sin (- (* 1/2 (PI)) lambda2)))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) #s(literal -1/2 binary64))) phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) phi2 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))
(cos (- (+ lambda1 (* 1/2 (PI))) lambda2))
(cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(fma.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (neg.f64 phi2) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* -1/2 (* phi2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) phi2 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/6 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi2) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (*.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) #s(literal -1/2 binary64))) phi2) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) phi2 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))))
(atan2 (* 1/2 (- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2) (neg.f64 phi2)))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(* 1/2 (- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))))
(*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2) (neg.f64 phi2)))) #s(literal 1/2 binary64))
(- (cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI))))) (cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))))
(-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2) (neg.f64 phi2))))
(cos (- (+ lambda1 (* -1 phi2)) (+ lambda2 (* 1/2 (PI)))))
(cos.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(cos (- (* 1/2 (PI)) (+ lambda2 (* -1 phi2))))
(cos.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2) (neg.f64 phi2)))
(cos (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))
(cos.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2) (neg.f64 phi2)))

rewrite235.0ms (0.9%)

Memory
46.9MiB live, 303.9MiB allocated
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
094535
0147528
1643452
26143452
08743452
Stop Event
iter limit
node limit
iter limit
Counts
28 → 470
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64))
(-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))
#s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(atan2.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))
(cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))
#s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.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 (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (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 (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 (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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.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 (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 (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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) phi2))) (cos.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) phi2)) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 phi2 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (-.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(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 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.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 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (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 (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 (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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.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 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.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 (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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(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 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 lambda1)))
(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 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 lambda1)))
(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 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (neg.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 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.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 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))
(cos.f64 (neg.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2)))
(cos.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(cos.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2))
(+.f64 (/.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 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)))
(sin.f64 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (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 (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 (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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.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 (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 (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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) phi2))) (cos.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) phi2)) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 phi2 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (-.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(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 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.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 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (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 (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 (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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.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 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.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 (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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(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 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 lambda1)))
(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 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 lambda1)))
(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 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (neg.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 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.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 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))
(cos.f64 (neg.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2)))
(cos.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(cos.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2))
(+.f64 (/.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 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)))
(*.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda2 lambda1))) (-.f64 lambda2 lambda1))
(*.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (fma.f64 lambda1 (-.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (*.f64 (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 2 binary64)) (/.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (/.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (fma.f64 (/.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 2 binary64)) (/.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (/.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (pow.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 3 binary64)) (pow.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 3 binary64))) (*.f64 (fma.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (+.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))) #s(literal -2 binary64))
(/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64))
(neg.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal -2 binary64)))
(-.f64 (/.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (/.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (pow.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 3 binary64)) (pow.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (+.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (pow.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 2 binary64))) (+.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))))
(/.f64 (-.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 3 binary64)) (pow.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 3 binary64))) (fma.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (+.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)) (+.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))))) (/.f64 (pow.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 2 binary64)) (+.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))))))
(-.f64 (/.f64 (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 3 binary64)) (fma.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (+.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(literal 3 binary64)) (fma.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) (+.f64 #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))) #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) (pow.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64)))))
(-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))
#s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (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 (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 (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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.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 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.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 (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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(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 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 lambda1)))
(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 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 lambda1)))
(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 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (neg.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 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.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 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))
(cos.f64 (neg.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2)))
(cos.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(cos.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2))
(+.f64 (/.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (sin.f64 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)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.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 (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (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 (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 (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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.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 (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 (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 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) phi2))) (cos.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) phi2)) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 phi2 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (-.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(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 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.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 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda2 lambda1) (-.f64 lambda2 lambda1))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))
(/.f64 (-.f64 (*.f64 (-.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 lambda1) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))
(/.f64 (+.f64 (pow.f64 (-.f64 lambda2 lambda1) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (-.f64 lambda2 lambda1) (-.f64 lambda2 lambda1) (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (PI.f64)) (+.f64 lambda1 lambda2) (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda2 lambda1)))) (*.f64 #s(literal -2 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (fma.f64 (neg.f64 (PI.f64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)) (*.f64 #s(literal -2 binary64) (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))))) (*.f64 #s(literal -2 binary64) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))
(/.f64 (fma.f64 (PI.f64) (+.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (fma.f64 (PI.f64) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))
(/.f64 (fma.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda2 lambda1)) #s(literal -2 binary64) (*.f64 (+.f64 lambda1 lambda2) (neg.f64 (PI.f64)))) (*.f64 (+.f64 lambda1 lambda2) #s(literal -2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda2 lambda1)) #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (PI.f64))) (*.f64 (+.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal -2 binary64) (*.f64 (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)) (neg.f64 (PI.f64)))) (*.f64 (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)) #s(literal -2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)) (PI.f64))) (*.f64 (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda2 lambda1))) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda2 lambda1)) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (fma.f64 lambda1 (-.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))
(-.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))
(-.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)))))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)
(-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))
(+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 lambda2 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))
(*.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(*.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2)))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2)))))
(*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))) (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (*.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 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.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 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))) (neg.f64 (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))) #s(literal 2 binary64)))
(/.f64 (*.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 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (+.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 2 binary64) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(neg.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2)))))
(neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda1 lambda2)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 phi1))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (*.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64))
#s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi1))))
#s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))
(*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (neg.f64 (cos.f64 lambda1)))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 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 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (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 (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 (*.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 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda1) lambda2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda1 lambda2))))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.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 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (neg.f64 (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)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) phi1)
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) phi1) (cos.f64 phi2))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (cos.f64 phi2)))
(*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) phi1))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (*.f64 phi1 (cos.f64 phi2))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (*.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 phi1 (cos.f64 phi2))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 phi1 (cos.f64 phi2)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (*.f64 (*.f64 phi1 (cos.f64 phi2)) (+.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 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 phi1 (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 phi1 (cos.f64 phi2))))
(fma.f64 (*.f64 phi1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (*.f64 phi1 (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 phi1 (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 phi1 (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 phi1 (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 phi1 (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 phi1 (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 phi1 (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 phi1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(+.f64 (*.f64 (*.f64 phi1 (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 lambda2) (*.f64 (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))
(-.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))))
(cos.f64 (neg.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))
(cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (sin.f64 lambda1)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (cos.f64 lambda2)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (sin.f64 lambda2)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (cos.f64 lambda2)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (sin.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (cos.f64 lambda2)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (cos.f64 lambda2)) (-.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (sin.f64 lambda2)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (cos.f64 lambda2)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (sin.f64 lambda2))))))
(fma.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (sin.f64 lambda2) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (cos.f64 lambda2)))
(sin.f64 (+.f64 (neg.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 phi2 lambda2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 phi2 lambda2))))
(-.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))))
(cos.f64 (neg.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))
(cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2))
(+.f64 (*.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (sin.f64 lambda2)) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (cos.f64 lambda2)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (sin.f64 lambda2)))
#s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))

eval287.0ms (1.1%)

Memory
6.2MiB live, 344.9MiB allocated
Compiler

Compiled 57 133 to 4 304 computations (92.5% saved)

prune297.0ms (1.1%)

Memory
-16.6MiB live, 465.9MiB allocated
Pruning

141 alts after pruning (139 fresh and 2 done)

PrunedKeptTotal
New93345978
Fresh2294116
Picked325
Done000
Total9581411 099
Accuracy
99.9%
Counts
1 099 → 141
Alt Table
Click to see full alt table
StatusAccuracyProgram
25.8%
(atan2.f64 (/.f64 (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (-.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
13.1%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1))))
14.0%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
14.9%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
27.4%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
25.9%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
20.6%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
18.0%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
25.8%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
19.7%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
24.0%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (sin.f64 (+.f64 (neg.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
17.7%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
17.8%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
16.0%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
17.4%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
21.9%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) (cos.f64 (-.f64 lambda1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) #s(approx (cos (- (+ (* 1/2 (PI)) phi2) lambda2)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
17.8%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) #s(approx (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
12.7%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) #s(approx (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
22.8%
(atan2.f64 (/.f64 (-.f64 #s(approx (cos (- (- lambda1 (+ lambda2 (/ (PI) 2))) phi2)) #s(approx (cos (- lambda1 (+ (* (PI) 1/2) lambda2))) (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(approx (cos (- lambda1 (- lambda2 (+ (/ (PI) 2) phi2)))) (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
18.7%
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
46.9%
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
24.1%
(atan2.f64 (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
77.5%
(atan2.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
74.4%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
17.3%
(atan2.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))))))
99.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
86.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))))
81.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))))
82.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
60.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
84.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
89.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))))
75.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
74.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
76.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))))
73.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
86.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
52.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
66.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1)))))))
66.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))))))
66.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1))))))
66.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1))))))
66.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (sin.f64 phi1))))))
59.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))) (sin.f64 phi1))))))
50.8%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1))))))
50.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1))))))
44.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))) (sin.f64 phi1))))))
50.1%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (*.f64 #s(literal 1 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (sin.f64 phi1))))))
54.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1))))))
55.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (sin.f64 phi1))))))
46.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1))))))
63.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
61.5%
(atan2.f64 (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.4%
(atan2.f64 (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
62.1%
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1)) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
58.8%
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1)) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
61.9%
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) (*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda1)) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
70.4%
(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))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
78.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
71.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
78.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
54.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))))
69.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 #s(approx (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
72.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
66.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
53.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))))
52.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
49.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))))) phi1))))
53.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
52.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
69.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
60.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
60.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
64.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
65.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
51.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (* (cos phi2) phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1)))))
52.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)) (sin.f64 phi2) (sin.f64 phi2))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
53.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
28.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))))
32.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1))) (cos.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1)))) #s(literal 2 binary64))))
16.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))))
16.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))))
28.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))))
41.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))))
19.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))))
51.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (-.f64 (sin.f64 phi2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi2))))))
49.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
49.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))))
41.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
41.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
42.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (*.f64 #s(literal 1 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))))
42.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
45.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
45.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
34.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) phi1))))
33.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))))
33.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
33.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
30.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))))
30.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
33.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
32.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
42.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (sin.f64 phi1)))))))
17.6%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (-.f64 lambda1 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
62.1%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
58.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
42.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
29.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
61.5%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
60.9%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
43.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
28.5%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
46.1%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
41.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
32.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
23.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
27.0%
(atan2.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))))
26.6%
(atan2.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
23.6%
(atan2.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
25.2%
(atan2.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
24.0%
(atan2.f64 (*.f64 (cos.f64 #s(approx (- (+ (/ (PI) 2) lambda2) lambda1) (*.f64 (-.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1) #s(literal 1 binary64)) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
18.9%
(atan2.f64 (*.f64 (cos.f64 #s(approx (- (+ (/ (PI) 2) lambda2) lambda1) (neg.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
78.7%
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
62.0%
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
49.5%
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
46.1%
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
56.1%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda2)))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
56.2%
(atan2.f64 (*.f64 #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)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
43.4%
(atan2.f64 (*.f64 #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)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
31.9%
(atan2.f64 (*.f64 #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)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
52.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
40.0%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
28.5%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
49.3%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
36.0%
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (sin lambda2)) (cos lambda1))) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
31.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
32.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
31.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
48.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 #s(approx (* (sin (- lambda1 lambda2)) (+ (* 1/24 (* phi2 phi2)) -1/2)) (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (sin.f64 lambda1))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
48.6%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
Compiler

Compiled 18 382 to 6 020 computations (67.3% saved)

regimes432.0ms (1.6%)

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

6 calls:

87.0ms
phi2
75.0ms
(-.f64 lambda1 lambda2)
68.0ms
phi1
57.0ms
lambda1
56.0ms
lambda2
Results
AccuracySegmentsBranch
99.8%1(-.f64 lambda1 lambda2)
99.8%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.8%1lambda1
99.8%1lambda2
99.8%1phi1
99.8%1phi2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes391.0ms (1.5%)

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

6 calls:

95.0ms
phi1
76.0ms
phi2
56.0ms
lambda1
52.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
51.0ms
lambda2
Results
AccuracySegmentsBranch
99.7%1(-.f64 lambda1 lambda2)
99.7%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.7%1lambda1
99.7%1lambda2
99.7%1phi1
99.7%1phi2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes362.0ms (1.4%)

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

6 calls:

80.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
60.0ms
phi1
55.0ms
phi2
52.0ms
(-.f64 lambda1 lambda2)
52.0ms
lambda1
Results
AccuracySegmentsBranch
91.2%2phi1
96.3%3phi2
93.2%3(-.f64 lambda1 lambda2)
89.5%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
91.1%2lambda1
94.6%3lambda2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes71.0ms (0.3%)

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

1 calls:

55.0ms
phi2
Results
AccuracySegmentsBranch
96.2%3phi2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes65.0ms (0.2%)

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

1 calls:

51.0ms
phi2
Results
AccuracySegmentsBranch
96.2%3phi2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes64.0ms (0.2%)

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

1 calls:

52.0ms
phi2
Results
AccuracySegmentsBranch
96.1%3phi2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes66.0ms (0.3%)

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

1 calls:

55.0ms
phi2
Results
AccuracySegmentsBranch
96.0%3phi2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes321.0ms (1.2%)

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

6 calls:

53.0ms
lambda1
53.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
50.0ms
phi2
49.0ms
(-.f64 lambda1 lambda2)
48.0ms
lambda2
Results
AccuracySegmentsBranch
89.4%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
89.4%1lambda1
89.4%1phi1
89.4%1(-.f64 lambda1 lambda2)
89.4%1lambda2
89.4%1phi2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes387.0ms (1.5%)

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

6 calls:

85.0ms
lambda2
78.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
61.0ms
(-.f64 lambda1 lambda2)
54.0ms
phi2
53.0ms
lambda1
Results
AccuracySegmentsBranch
86.0%3(-.f64 lambda1 lambda2)
82.5%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
89.5%3lambda2
89.5%3lambda1
88.5%3phi1
87.1%3phi2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes57.0ms (0.2%)

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

1 calls:

44.0ms
lambda1
Results
AccuracySegmentsBranch
89.5%3lambda1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes123.0ms (0.5%)

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

2 calls:

62.0ms
lambda2
42.0ms
lambda1
Results
AccuracySegmentsBranch
89.5%3lambda2
83.2%2lambda1
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes105.0ms (0.4%)

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

2 calls:

47.0ms
phi1
44.0ms
lambda2
Results
AccuracySegmentsBranch
88.1%3phi1
83.4%3lambda2
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes350.0ms (1.3%)

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

6 calls:

83.0ms
lambda2
74.0ms
phi2
52.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.0ms
(-.f64 lambda1 lambda2)
43.0ms
phi1
Results
AccuracySegmentsBranch
78.7%1lambda2
78.7%1lambda1
78.7%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
78.7%1(-.f64 lambda1 lambda2)
78.7%1phi2
78.7%1phi1
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes217.0ms (0.8%)

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

6 calls:

53.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.0ms
phi1
35.0ms
lambda1
29.0ms
lambda2
25.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
78.7%1phi2
78.7%1lambda2
78.7%1(-.f64 lambda1 lambda2)
78.7%1lambda1
78.7%1phi1
78.7%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes191.0ms (0.7%)

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

6 calls:

61.0ms
(-.f64 lambda1 lambda2)
32.0ms
phi1
25.0ms
lambda2
22.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
22.0ms
phi2
Results
AccuracySegmentsBranch
76.4%3phi2
78.8%3lambda2
71.7%1(-.f64 lambda1 lambda2)
80.2%3lambda1
71.7%1phi1
73.2%2(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes75.0ms (0.3%)

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

2 calls:

45.0ms
lambda2
24.0ms
lambda1
Results
AccuracySegmentsBranch
78.4%3lambda2
75.0%3lambda1
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes74.0ms (0.3%)

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

3 calls:

25.0ms
lambda1
24.0ms
lambda2
20.0ms
phi2
Results
AccuracySegmentsBranch
75.0%3lambda1
69.3%1phi2
74.3%4lambda2
Compiler

Compiled 3 to 12 computations (-300% saved)

regimes150.0ms (0.6%)

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

5 calls:

60.0ms
lambda2
21.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
20.0ms
lambda1
20.0ms
(-.f64 lambda1 lambda2)
20.0ms
phi1
Results
AccuracySegmentsBranch
71.2%2lambda2
69.3%1phi1
69.3%1(-.f64 lambda1 lambda2)
69.3%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
69.3%1lambda1
Compiler

Compiled 30 to 34 computations (-13.3% saved)

regimes31.0ms (0.1%)

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

1 calls:

25.0ms
lambda2
Results
AccuracySegmentsBranch
69.3%1lambda2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes102.0ms (0.4%)

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

6 calls:

38.0ms
(-.f64 lambda1 lambda2)
15.0ms
lambda2
11.0ms
lambda1
11.0ms
phi2
11.0ms
phi1
Results
AccuracySegmentsBranch
69.3%3lambda1
66.8%2phi1
65.1%1(-.f64 lambda1 lambda2)
65.1%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
69.3%3phi2
69.4%3lambda2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes26.0ms (0.1%)

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

2 calls:

12.0ms
lambda2
11.0ms
lambda1
Results
AccuracySegmentsBranch
69.3%3lambda1
69.3%3lambda2
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes37.0ms (0.1%)

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

2 calls:

24.0ms
phi2
11.0ms
lambda1
Results
AccuracySegmentsBranch
69.3%3phi2
65.1%1lambda1
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes55.0ms (0.2%)

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

3 calls:

31.0ms
lambda2
11.0ms
phi1
11.0ms
phi2
Results
AccuracySegmentsBranch
68.2%3phi1
55.5%2lambda2
67.7%3phi2
Compiler

Compiled 3 to 12 computations (-300% saved)

regimes57.0ms (0.2%)

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

6 calls:

11.0ms
lambda1
11.0ms
lambda2
8.0ms
(-.f64 lambda1 lambda2)
8.0ms
phi2
8.0ms
phi1
Results
AccuracySegmentsBranch
49.4%1lambda2
49.4%1phi2
49.4%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.4%1lambda1
49.4%1(-.f64 lambda1 lambda2)
49.4%1phi1
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes27.0ms (0.1%)

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

6 calls:

7.0ms
phi1
4.0ms
lambda2
4.0ms
lambda1
4.0ms
(-.f64 lambda1 lambda2)
4.0ms
phi2
Results
AccuracySegmentsBranch
45.4%1(-.f64 lambda1 lambda2)
45.4%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.4%1phi1
45.4%1phi2
49.4%3lambda2
49.4%3lambda1
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes13.0ms (0%)

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

2 calls:

8.0ms
lambda1
3.0ms
lambda2
Results
AccuracySegmentsBranch
49.4%3lambda1
49.4%3lambda2
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes22.0ms (0.1%)

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

6 calls:

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

Compiled 31 to 38 computations (-22.6% saved)

regimes19.0ms (0.1%)

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

6 calls:

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

Compiled 31 to 38 computations (-22.6% saved)

regimes79.0ms (0.3%)

Memory
-29.2MiB live, 15.6MiB allocated
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

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

6 calls:

73.0ms
phi1
1.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
1.0ms
lambda2
1.0ms
(-.f64 lambda1 lambda2)
1.0ms
phi2
Results
AccuracySegmentsBranch
32.8%1(-.f64 lambda1 lambda2)
32.8%1lambda1
32.8%1lambda2
32.8%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
32.8%1phi1
32.8%1phi2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

bsearch175.0ms (0.7%)

Memory
14.5MiB live, 246.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
86.0ms
4.2172736305639083e-16
16.114632849502623
79.0ms
-119.11998174754957
-0.2177104571831781
Samples
137.0ms201×1valid
14.0ms87×0valid
Compiler

Compiled 1 721 to 1 196 computations (30.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 138.0ms
ival-cos: 51.0ms (37% of total)
ival-sin: 50.0ms (36.3% of total)
adjust: 14.0ms (10.2% of total)
ival-mult: 12.0ms (8.7% of total)
ival-sub: 5.0ms (3.6% of total)
ival-atan2: 5.0ms (3.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch96.0ms (0.4%)

Memory
-12.1MiB live, 84.6MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
90.0ms
5.574510711612704e-112
4.61852464166141e-109
2.0ms
-119.11998174754957
-0.2177104571831781
Samples
63.0ms87×1valid
3.0ms25×0valid
Compiler

Compiled 1 272 to 909 computations (28.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 61.0ms
ival-sin: 27.0ms (44.1% of total)
ival-cos: 19.0ms (31.1% of total)
adjust: 6.0ms (9.8% of total)
ival-mult: 5.0ms (8.2% of total)
ival-sub: 2.0ms (3.3% of total)
ival-atan2: 2.0ms (3.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch5.0ms (0%)

Memory
9.1MiB live, 9.1MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
1.0ms
5.574510711612704e-112
4.61852464166141e-109
2.0ms
-119.11998174754957
-0.2177104571831781
Compiler

Compiled 1 272 to 909 computations (28.5% saved)

bsearch4.0ms (0%)

Memory
9.3MiB live, 9.3MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
1.0ms
5.574510711612704e-112
4.61852464166141e-109
1.0ms
-119.11998174754957
-0.2177104571831781
Compiler

Compiled 1 122 to 789 computations (29.7% saved)

bsearch66.0ms (0.3%)

Memory
15.2MiB live, 60.8MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
1.0ms
5.574510711612704e-112
4.61852464166141e-109
61.0ms
-1683232006.9924603
-293394425.20030904
Samples
49.0ms68×1valid
5.0ms28×0valid
Compiler

Compiled 1 106 to 791 computations (28.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 50.0ms
ival-cos: 19.0ms (38.3% of total)
ival-sin: 18.0ms (36.3% of total)
adjust: 5.0ms (10.1% of total)
ival-mult: 4.0ms (8.1% of total)
ival-sub: 2.0ms (4% of total)
ival-atan2: 2.0ms (4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch217.0ms (0.8%)

Memory
-17.6MiB live, 228.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
113.0ms
9.771572499192908e-21
7.1973279743903346e-9
97.0ms
-2.663376629192184e-5
-2.4612691417784464e-6
Samples
148.0ms118×1valid
24.0ms138×0valid
Compiler

Compiled 1 341 to 978 computations (27.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 162.0ms
ival-cos: 69.0ms (42.7% of total)
ival-sin: 63.0ms (39% of total)
adjust: 12.0ms (7.4% of total)
ival-mult: 10.0ms (6.2% of total)
ival-sub: 4.0ms (2.5% of total)
ival-atan2: 4.0ms (2.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory
10.7MiB live, 10.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
2.0ms
9.771572499192908e-21
7.1973279743903346e-9
1.0ms
-2.663376629192184e-5
-2.4612691417784464e-6
Compiler

Compiled 1 211 to 888 computations (26.7% saved)

bsearch166.0ms (0.6%)

Memory
-32.9MiB live, 301.0MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
81.0ms
4.66113786995689e-27
3.858236972226192e-24
75.0ms
-37696060.3465776
-1420553.107584953
Samples
122.0ms138×1valid
21.0ms102×0valid
Compiler

Compiled 987 to 744 computations (24.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 132.0ms
ival-cos: 57.0ms (43.3% of total)
ival-sin: 47.0ms (35.7% of total)
adjust: 10.0ms (7.6% of total)
ival-mult: 10.0ms (7.6% of total)
ival-atan2: 5.0ms (3.8% of total)
ival-sub: 4.0ms (3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch291.0ms (1.1%)

Memory
11.9MiB live, 304.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
83.0ms
3.457437793399494e-7
1.992255817286591e-5
199.0ms
-0.1074040764012421
-9.96937728202403e-24
Samples
256.0ms200×1valid
12.0ms88×0valid
Compiler

Compiled 1 197 to 906 computations (24.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 255.0ms
ival-cos: 164.0ms (64.3% of total)
ival-sin: 51.0ms (20% of total)
adjust: 17.0ms (6.7% of total)
ival-mult: 13.0ms (5.1% of total)
ival-sub: 5.0ms (2% of total)
ival-atan2: 5.0ms (2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch81.0ms (0.3%)

Memory
23.4MiB live, 115.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
47.0ms
0.00026114368787316086
0.0007798930707002903
30.0ms
-2.663376629192184e-5
-2.4612691417784464e-6
Samples
59.0ms64×1valid
11.0ms64×0valid
Compiler

Compiled 621 to 486 computations (21.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 65.0ms
ival-cos: 27.0ms (41.6% of total)
ival-sin: 24.0ms (37% of total)
adjust: 5.0ms (7.7% of total)
ival-mult: 5.0ms (7.7% of total)
ival-sub: 2.0ms (3.1% of total)
ival-atan2: 2.0ms (3.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch239.0ms (0.9%)

Memory
-11.3MiB live, 208.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
93.0ms
3.858236972226192e-24
1.5828342569261318e-19
135.0ms
-0.004475335049166723
-1.4171280676430555e-7
Samples
162.0ms131×1valid
54.0ms125×0valid
Compiler

Compiled 939 to 712 computations (24.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 201.0ms
ival-cos: 74.0ms (36.8% of total)
ival-sin: 57.0ms (28.4% of total)
adjust: 51.0ms (25.4% of total)
ival-mult: 10.0ms (5% of total)
ival-sub: 4.0ms (2% of total)
ival-atan2: 4.0ms (2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory
6.9MiB live, 6.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
0.00026114368787316086
0.0007798930707002903
1.0ms
-2.663376629192184e-5
-2.4612691417784464e-6
Compiler

Compiled 676 to 519 computations (23.2% saved)

bsearch2.0ms (0%)

Memory
4.7MiB live, 4.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
3.858236972226192e-24
1.5828342569261318e-19
Compiler

Compiled 523 to 392 computations (25% saved)

bsearch108.0ms (0.4%)

Memory
15.2MiB live, 79.3MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.858236972226192e-24
1.5828342569261318e-19
103.0ms
-0.004475335049166723
-1.4171280676430555e-7
Samples
88.0ms53×1valid
10.0ms59×0valid
Compiler

Compiled 1 147 to 832 computations (27.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 93.0ms
ival-sin: 63.0ms (67.9% of total)
ival-cos: 18.0ms (19.4% of total)
adjust: 4.0ms (4.3% of total)
ival-mult: 4.0ms (4.3% of total)
ival-sub: 2.0ms (2.2% of total)
ival-atan2: 2.0ms (2.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch251.0ms (1%)

Memory
3.1MiB live, 431.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
106.0ms
9191919136509.045
7.855149124036948e+23
136.0ms
-5.3222216886691865e+88
-9.706711734997893e+86
Samples
220.0ms234×1valid
9.0ms38×0valid
Compiler

Compiled 1 217 to 874 computations (28.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 216.0ms
ival-sin: 81.0ms (37.5% of total)
ival-cos: 78.0ms (36.1% of total)
ival-atan2: 19.0ms (8.8% of total)
adjust: 16.0ms (7.4% of total)
ival-mult: 15.0ms (6.9% of total)
ival-sub: 6.0ms (2.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch165.0ms (0.6%)

Memory
-14.6MiB live, 268.3MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
66.0ms
1.891399094486917e-39
1.920687156646888e-35
91.0ms
-293394425.20030904
-119.11998174754957
Samples
127.0ms184×1valid
14.0ms88×0valid
Compiler

Compiled 1 370 to 959 computations (30% saved)

Precisions
Click to see histograms. Total time spent on operations: 129.0ms
ival-cos: 47.0ms (36.5% of total)
ival-sin: 44.0ms (34.2% of total)
adjust: 13.0ms (10.1% of total)
ival-mult: 11.0ms (8.5% of total)
ival-sub: 8.0ms (6.2% of total)
ival-atan2: 5.0ms (3.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch235.0ms (0.9%)

Memory
-26.2MiB live, 267.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
108.0ms
1.992255817286591e-5
648.4908514563219
94.0ms
-13007290.002695274
-0.1074040764012421
Samples
176.0ms203×1valid
13.0ms85×0valid
Compiler

Compiled 1 575 to 1 086 computations (31% saved)

Precisions
Click to see histograms. Total time spent on operations: 176.0ms
ival-sin: 69.0ms (39.3% of total)
ival-cos: 56.0ms (31.9% of total)
adjust: 28.0ms (15.9% of total)
ival-mult: 12.0ms (6.8% of total)
ival-sub: 5.0ms (2.8% of total)
ival-atan2: 5.0ms (2.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch99.0ms (0.4%)

Memory
16.0MiB live, 110.6MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.858236972226192e-24
1.5828342569261318e-19
94.0ms
-15370101642505.678
-289536786.0133656
Samples
83.0ms97×1valid
5.0ms31×0valid
Compiler

Compiled 1 691 to 1 176 computations (30.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 68.0ms
ival-cos: 23.0ms (33.8% of total)
ival-sin: 22.0ms (32.3% of total)
ival-atan2: 9.0ms (13.2% of total)
adjust: 7.0ms (10.3% of total)
ival-mult: 6.0ms (8.8% of total)
ival-sub: 2.0ms (2.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
3.6MiB live, 3.6MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
0.0ms
9.564562014030854e-21
9.771572499192908e-21
1.0ms
-5.3222216886691865e+88
-9.706711734997893e+86
Compiler

Compiled 755 to 528 computations (30.1% saved)

simplify66.0ms (0.3%)

Memory
-5.8MiB live, 48.4MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
02812180
14772180
27872100
314592080
432772080
Stop Event
node limit
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(if (<=.f64 phi2 #s(literal -7926335344172073/36028797018963968 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 1152921504606847/288230376151711744 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))))))
(if (<=.f64 phi2 #s(literal -7926335344172073/36028797018963968 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 2379801487644895/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi2 #s(literal -7926335344172073/36028797018963968 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 2379801487644895/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi2 #s(literal -7926335344172073/36028797018963968 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 2379801487644895/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi2 #s(literal -300000000 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 2379801487644895/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(if (<=.f64 lambda1 #s(literal -5902958103587057/295147905179352825856 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (if (<=.f64 lambda1 #s(literal 8583373319263867/1208925819614629174706176 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -5902958103587057/295147905179352825856 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (if (<=.f64 lambda1 #s(literal 8583373319263867/1208925819614629174706176 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
(if (<=.f64 lambda2 #s(literal -1450000 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))))) (if (<=.f64 lambda2 #s(literal 5172291977198265/1361129467683753853853498429727072845824 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))))))
(if (<=.f64 phi1 #s(literal -7378697629483821/147573952589676412928 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (if (<=.f64 phi1 #s(literal 1438846037749345/73786976294838206464 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(if (<=.f64 lambda1 #s(literal -7673845534663173/295147905179352825856 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal 3504881374004815/4611686018427387904 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -5072854620270127/1152921504606846976 binary64)) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal 3219224052291593/20769187434139310514121985316880384 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda1 #s(literal -7673845534663173/295147905179352825856 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal 3504881374004815/4611686018427387904 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda2 #s(literal 3219224052291593/20769187434139310514121985316880384 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(if (<=.f64 lambda2 #s(literal -7378697629483821/295147905179352825856 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (if (<=.f64 lambda2 #s(literal 3219224052291593/20769187434139310514121985316880384 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
(if (<=.f64 lambda1 #s(literal -979999999999999986731095938899120420611618678999260148288602682744854216316028356395008 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) (if (<=.f64 lambda1 #s(literal 9500000000000 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))))
(if (<=.f64 phi2 #s(literal -120 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) (if (<=.f64 phi2 #s(literal 888592995497189/46768052394588893382517914646921056628989841375232 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))))
(if (<=.f64 phi1 #s(literal -7926335344172073/72057594037927936 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 2132904783522667/1152921504606846976 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(if (<=.f64 lambda2 #s(literal -300000000 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal 3219224052291593/20769187434139310514121985316880384 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda1 #s(literal -979999999999999986731095938899120420611618678999260148288602682744854216316028356395008 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (if (<=.f64 lambda1 #s(literal 1595073594941899/166153499473114484112975882535043072 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(if (<=.f64 phi2 #s(literal -7926335344172073/36028797018963968 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 1152921504606847/288230376151711744 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 lambda1) lambda2) lambda1)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))))))
(if (<=.f64 phi2 #s(literal -7926335344172073/36028797018963968 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 2379801487644895/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (or (<=.f64 phi2 #s(literal -7926335344172073/36028797018963968 binary64)) (not (<=.f64 phi2 #s(literal 2379801487644895/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))))
(if (<=.f64 phi2 #s(literal -7926335344172073/36028797018963968 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 2379801487644895/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (or (<=.f64 phi2 #s(literal -7926335344172073/36028797018963968 binary64)) (not (<=.f64 phi2 #s(literal 2379801487644895/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))))))
(if (<=.f64 phi2 #s(literal -7926335344172073/36028797018963968 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 2379801487644895/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (or (<=.f64 phi2 #s(literal -7926335344172073/36028797018963968 binary64)) (not (<=.f64 phi2 #s(literal 2379801487644895/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(if (<=.f64 phi2 #s(literal -300000000 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 2379801487644895/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (or (<=.f64 phi2 #s(literal -300000000 binary64)) (not (<=.f64 phi2 #s(literal 2379801487644895/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(if (<=.f64 lambda1 #s(literal -5902958103587057/295147905179352825856 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (if (<=.f64 lambda1 #s(literal 8583373319263867/1208925819614629174706176 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -5902958103587057/295147905179352825856 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (if (<=.f64 lambda1 #s(literal 8583373319263867/1208925819614629174706176 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
(if (or (<=.f64 lambda1 #s(literal -5902958103587057/295147905179352825856 binary64)) (not (<=.f64 lambda1 #s(literal 8583373319263867/1208925819614629174706176 binary64)))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))))))
(if (<=.f64 lambda2 #s(literal -1450000 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))))) (if (<=.f64 lambda2 #s(literal 5172291977198265/1361129467683753853853498429727072845824 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))))))
(if (or (<=.f64 lambda2 #s(literal -1450000 binary64)) (not (<=.f64 lambda2 #s(literal 5172291977198265/1361129467683753853853498429727072845824 binary64)))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(if (<=.f64 phi1 #s(literal -7378697629483821/147573952589676412928 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (if (<=.f64 phi1 #s(literal 1438846037749345/73786976294838206464 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(if (or (<=.f64 phi1 #s(literal -7378697629483821/147573952589676412928 binary64)) (not (<=.f64 phi1 #s(literal 1438846037749345/73786976294838206464 binary64)))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(if (<=.f64 lambda1 #s(literal -7673845534663173/295147905179352825856 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal 3504881374004815/4611686018427387904 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (or (<=.f64 lambda1 #s(literal -7673845534663173/295147905179352825856 binary64)) (not (<=.f64 lambda1 #s(literal 3504881374004815/4611686018427387904 binary64)))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(if (<=.f64 lambda2 #s(literal -5072854620270127/1152921504606846976 binary64)) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal 3219224052291593/20769187434139310514121985316880384 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (or (<=.f64 lambda2 #s(literal -5072854620270127/1152921504606846976 binary64)) (not (<=.f64 lambda2 #s(literal 3219224052291593/20769187434139310514121985316880384 binary64)))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
(if (<=.f64 lambda1 #s(literal -7673845534663173/295147905179352825856 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal 3504881374004815/4611686018427387904 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (or (<=.f64 lambda1 #s(literal -7673845534663173/295147905179352825856 binary64)) (not (<=.f64 lambda1 #s(literal 3504881374004815/4611686018427387904 binary64)))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda2 #s(literal 3219224052291593/20769187434139310514121985316880384 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(if (<=.f64 lambda2 #s(literal -7378697629483821/295147905179352825856 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (if (<=.f64 lambda2 #s(literal 3219224052291593/20769187434139310514121985316880384 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
(if (<=.f64 lambda1 #s(literal -979999999999999986731095938899120420611618678999260148288602682744854216316028356395008 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) (if (<=.f64 lambda1 #s(literal 9500000000000 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))))
(if (or (<=.f64 lambda1 #s(literal -979999999999999986731095938899120420611618678999260148288602682744854216316028356395008 binary64)) (not (<=.f64 lambda1 #s(literal 9500000000000 binary64)))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 phi2 #s(literal -120 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) (if (<=.f64 phi2 #s(literal 888592995497189/46768052394588893382517914646921056628989841375232 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))))
(if (or (<=.f64 phi2 #s(literal -120 binary64)) (not (<=.f64 phi2 #s(literal 888592995497189/46768052394588893382517914646921056628989841375232 binary64)))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi1 #s(literal -7926335344172073/72057594037927936 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 2132904783522667/1152921504606846976 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (or (<=.f64 phi1 #s(literal -7926335344172073/72057594037927936 binary64)) (not (<=.f64 phi1 #s(literal 2132904783522667/1152921504606846976 binary64)))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(if (<=.f64 lambda2 #s(literal -300000000 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal 3219224052291593/20769187434139310514121985316880384 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda1 #s(literal -979999999999999986731095938899120420611618678999260148288602682744854216316028356395008 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (if (<=.f64 lambda1 #s(literal 1595073594941899/166153499473114484112975882535043072 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
(if (or (<=.f64 lambda1 #s(literal -979999999999999986731095938899120420611618678999260148288602682744854216316028356395008 binary64)) (not (<=.f64 lambda1 #s(literal 1595073594941899/166153499473114484112975882535043072 binary64)))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (* (cos (- lambda2 lambda1)) (cos (+ lambda2 lambda1)))) (* 2 (cos (+ lambda2 lambda1))))) #s(approx (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (*.f64 (neg.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))

derivations2.0s (7.7%)

Memory
44.5MiB live, 1 121.1MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
011797233
143647194
087856610
01752
03052
110152
273852
0820352
09426024
134985749
085565289
097563
0156553
1653491
26257491
08191491
011637639
144067591
093087017
068409
0124374
1476308
24549308
08555308
02451062
1913987
23716907
08097854
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
Compiler

Compiled 2 180 to 289 computations (86.7% saved)

preprocess326.0ms (1.2%)

Memory
-21.7MiB live, 451.3MiB allocated
Compiler

Compiled 4 408 to 612 computations (86.1% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...