Spherical law of cosines

Time bar (total: 19.6s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated

analyze880.0ms (4.5%)

Memory
28.1MiB live, 1 067.8MiB 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
0%0%99.8%0.2%0%0%0%9
0%0%99.8%0.2%0%0%0%10
1.6%1.6%98.2%0.2%0%0%0%11
1.6%1.6%98.2%0.2%0%0%0%12
Compiler

Compiled 21 to 19 computations (9.5% saved)

sample5.6s (28.8%)

Memory
-4.8MiB live, 7 686.1MiB allocated
Samples
3.9s6 192×1valid
1.1s2 052×0valid
14.0ms12×2valid
Precisions
Click to see histograms. Total time spent on operations: 4.5s
ival-cos: 1.6s (35.8% of total)
ival-mult: 1.1s (23.4% of total)
ival-sin: 950.0ms (21% of total)
ival-acos: 378.0ms (8.4% of total)
adjust: 280.0ms (6.2% of total)
ival-add: 129.0ms (2.9% of total)
ival-sub: 96.0ms (2.1% of total)
ival-true: 7.0ms (0.2% of total)
ival-assert: 4.0ms (0.1% of total)
Bogosity

explain444.0ms (2.3%)

Memory
-16.0MiB live, 1 220.2MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
81105(-7.576661764998041e+272 -5.920532298812312e+197 2.9077054759857258e-244 -1.3380036766689046e+145 7.116420324950255e-6)0-(cos.f64 (-.f64 lambda1 lambda2))
221(-2.2348008398083265e+306 -3.31742557051738e+106 -1.5088390631078103e+264 2.4168271193788573e+119 -9.336283534640384e+129)1(-1.9251594896708893e-31 -7.32774886872444e+66 4.478422507448934e-288 1.2443340331664293e+243 -4.8832590806320626e+262)(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
00-0-lambda2
00-0-phi2
00-0-(*.f64 (cos.f64 phi1) (cos.f64 phi2))
00-0-(-.f64 lambda1 lambda2)
00-0-R
00-0-(sin.f64 phi1)
00-0-(cos.f64 phi2)
00-0-lambda1
00-0-(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
00-0-(*.f64 (sin.f64 phi1) (sin.f64 phi2))
00-0-phi1
00-0-(sin.f64 phi2)
00-0-(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
00-0-(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
00-0-(cos.f64 phi1)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (-.f64 lambda1 lambda2))sensitivity1860
acos.f64(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))sensitivity224
Confusion
Predicted +Predicted -
+1010
-10253
Precision
0.4975369458128079
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+10100
-102251
Precision?
0.4926829268292683
Recall?
1.0
Freqs
test
numberfreq
053
1198
25
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
231.0ms354×1valid
42.0ms158×0valid
Compiler

Compiled 207 to 55 computations (73.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 228.0ms
ival-cos: 94.0ms (41.2% of total)
ival-sin: 54.0ms (23.7% of total)
ival-mult: 30.0ms (13.2% of total)
ival-acos: 20.0ms (8.8% of total)
adjust: 18.0ms (7.9% of total)
ival-sub: 6.0ms (2.6% of total)
ival-add: 6.0ms (2.6% of total)
ival-true: 1.0ms (0.4% of total)
ival-assert: 0.0ms (0% of total)

preprocess148.0ms (0.8%)

Memory
-1.1MiB live, 284.0MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0129397
1347389
2746389
31755389
43844389
01719
02919
15419
210219
324119
453919
5132819
6341619
7647219
0821418
Stop Event
iter limit
node limit
iter limit
node limit
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
Symmetry

(negabs R)

(sort phi1 phi2)

Compiler

Compiled 19 to 17 computations (10.5% saved)

eval0.0ms (0%)

Memory
0.2MiB live, 0.2MiB allocated
Compiler

Compiled 0 to 5 computations (-∞% saved)

prune9.0ms (0%)

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

Compiled 19 to 17 computations (10.5% saved)

simplify114.0ms (0.6%)

Memory
42.9MiB live, 174.0MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
cost-diff0
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
cost-diff1
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01792
02992
15492
210292
324192
453992
5132892
6341692
7647292
0821489
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R

localize209.0ms (1.1%)

Memory
-34.0MiB live, 208.8MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.21484375
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
accuracy0.26171875
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
accuracy3.8222422152005495
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy16.835371506797607
(cos.f64 (-.f64 lambda1 lambda2))
Samples
153.0ms177×1valid
17.0ms79×0valid
Compiler

Compiled 94 to 19 computations (79.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 151.0ms
ival-cos: 69.0ms (45.6% of total)
adjust: 34.0ms (22.5% of total)
ival-sin: 25.0ms (16.5% of total)
ival-mult: 11.0ms (7.3% of total)
ival-acos: 8.0ms (5.3% of total)
ival-sub: 2.0ms (1.3% of total)
ival-add: 2.0ms (1.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series36.0ms (0.2%)

Memory
0.7MiB live, 45.2MiB allocated
Counts
5 → 45
Calls
Call 1
Inputs
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(cos (- lambda1 lambda2))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* (sin phi1) (sin phi2))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
Calls

15 calls:

TimeVariablePointExpression
7.0ms
phi2
@inf
((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (cos (- lambda1 lambda2)))
5.0ms
phi2
@-inf
((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (cos (- lambda1 lambda2)))
4.0ms
lambda2
@inf
((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (cos (- lambda1 lambda2)))
3.0ms
lambda1
@inf
((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (cos (- lambda1 lambda2)))
2.0ms
phi1
@-inf
((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (cos (- lambda1 lambda2)))

simplify199.0ms (1%)

Memory
12.7MiB live, 199.1MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0183819
1684801
22705754
36261754
08014691
Stop Event
iter limit
node limit
Counts
45 → 45
Calls
Call 1
Inputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(cos (- lambda1 lambda2))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* (sin phi1) (sin phi2))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi1) (fma.f64 (neg.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) lambda1) (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 lambda1 (*.f64 #s(literal 1/6 binary64) lambda1) #s(literal -1 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (-.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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (cos.f64 phi2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (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 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))) phi1 (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(* phi1 (sin phi2))
(*.f64 (sin.f64 phi2) phi1)
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) (*.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 (sin.f64 phi2) phi1))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(*.f64 (fma.f64 (fma.f64 phi1 (*.f64 #s(literal -1/6 binary64) phi1) #s(literal 1 binary64)) (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (*.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))))) phi1)
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 phi2 (*.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))) phi2 (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(* phi2 (sin phi1))
(*.f64 (sin.f64 phi1) phi2)
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(fma.f64 (pow.f64 phi2 #s(literal 3 binary64)) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 phi1) phi2))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(*.f64 (fma.f64 (fma.f64 phi2 (*.f64 #s(literal -1/6 binary64) phi2) #s(literal 1 binary64)) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))) phi2)

rewrite149.0ms (0.8%)

Memory
34.0MiB live, 269.0MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01761
02961
19661
275461
0816358
Stop Event
iter limit
node limit
iter limit
Counts
5 → 127
Calls
Call 1
Inputs
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (*.f64 (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) (/.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(/.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (fma.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2))))
(/.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 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (+.f64 (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 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.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 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 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 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (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 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (/.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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (sin.f64 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 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (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 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))

eval42.0ms (0.2%)

Memory
4.6MiB live, 50.4MiB allocated
Compiler

Compiled 7 639 to 1 020 computations (86.6% saved)

prune106.0ms (0.5%)

Memory
-40.1MiB live, 104.1MiB allocated
Pruning

31 alts after pruning (31 fresh and 0 done)

PrunedKeptTotal
New13331164
Fresh000
Picked101
Done000
Total13431165
Accuracy
93.9%
Counts
165 → 31
Alt Table
Click to see full alt table
StatusAccuracyProgram
70.3%
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) R)
70.5%
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
70.4%
(*.f64 (-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))) R)
70.4%
(*.f64 (-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
70.6%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
70.7%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
70.5%
(*.f64 (acos.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))) R)
70.6%
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
70.6%
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))))) R)
70.6%
(*.f64 (acos.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))) R)
56.4%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
93.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
93.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
93.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))) R)
38.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
38.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)
45.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
41.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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)))))) R)
43.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
51.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
37.6%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
40.9%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi2) phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
33.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
31.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
46.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
53.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
51.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
33.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
34.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
40.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) R)
40.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
Compiler

Compiled 2 832 to 1 496 computations (47.2% saved)

simplify115.0ms (0.6%)

Memory
-5.0MiB live, 186.8MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))
cost-diff0
(acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
cost-diff0
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
cost-diff20
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
cost-diff0
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
cost-diff0
(acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
cost-diff1
(+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2)))
cost-diff0
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
cost-diff1
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
cost-diff0
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
cost-diff0
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
cost-diff0
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
cost-diff0
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
cost-diff0
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
cost-diff1
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
069741
0119741
1220741
2505741
31600684
44024684
08037669
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi1)
phi1
R
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))
(fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64))
(*.f64 #s(literal -1/6 binary64) phi2)
#s(literal -1/6 binary64)
phi2
#s(literal 1 binary64)
(*.f64 (sin.f64 phi1) phi2)
(sin.f64 phi1)
phi1
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(-.f64 phi2 phi1)
phi2
phi1
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
#s(literal 2 binary64)
(pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
R
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 R (acos.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(acos.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(cos.f64 lambda1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi1)
phi1
R
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))) R)
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2)))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))
(fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64))
(*.f64 #s(literal -1/6 binary64) phi2)
#s(literal -1/6 binary64)
phi2
#s(literal 1 binary64)
(*.f64 (sin.f64 phi1) phi2)
(*.f64 phi2 (sin.f64 phi1))
(sin.f64 phi1)
phi1
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) R)
(acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(-.f64 phi2 phi1)
phi2
phi1
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 1 binary64))) R)
(acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 1 binary64))
(-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
#s(literal 2 binary64)
(pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
R

localize837.0ms (4.3%)

Memory
9.0MiB live, 1 304.1MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.39291000976844204
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
accuracy0.42416000976844204
(pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))
accuracy3.8222422152005495
(acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
accuracy16.835371506797607
(cos.f64 (-.f64 lambda2 lambda1))
accuracy13.539378072047475
(cos.f64 (+.f64 phi2 phi1))
accuracy13.95210725882004
(cos.f64 (-.f64 phi2 phi1))
accuracy16.835371506797607
(cos.f64 (-.f64 lambda1 lambda2))
accuracy38.53665595694353
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
accuracy0.9801168665222959
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))
accuracy3.8222422152005495
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy16.835371506797607
(cos.f64 (-.f64 lambda1 lambda2))
accuracy30.11808309894727
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2)))
accuracy0.26171875
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
accuracy3.8222422152005495
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
accuracy16.835371506797607
(cos.f64 (-.f64 lambda2 lambda1))
accuracy28.172760250518753
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
accuracy0.21484375
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
accuracy0.21484375
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
accuracy0.26171875
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
accuracy3.8222422152005495
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
Samples
717.0ms253×1valid
5.0ms2valid
Compiler

Compiled 678 to 59 computations (91.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 630.0ms
ival-cos: 247.0ms (39.2% of total)
ival-mult: 93.0ms (14.8% of total)
ival-sin: 93.0ms (14.8% of total)
ival-acos: 86.0ms (13.7% of total)
adjust: 35.0ms (5.6% of total)
ival-sub: 27.0ms (4.3% of total)
ival-add: 23.0ms (3.7% of total)
ival-pow2: 12.0ms (1.9% of total)
const: 8.0ms (1.3% of total)
ival-div: 6.0ms (1% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series193.0ms (1%)

Memory
-4.8MiB live, 335.6MiB allocated
Counts
28 → 241
Calls
Call 1
Inputs
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2)))
(+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (+.f64 phi2 phi1))
(pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))
Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos lambda2) (cos phi1))
(+ (* lambda1 (* (cos phi1) (sin lambda2))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(/ (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(- (+ (* lambda1 (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))) (/ (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (* lambda1 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))) (/ (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (+ (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))) (/ (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(- (+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))
(+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos (- lambda2 lambda1))
(cos (- lambda1 lambda2))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))
(- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (neg lambda1)))
(+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi1) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi1) (sin (neg lambda1))))))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))
(- (+ (* lambda2 (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))))
(- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* lambda2 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))))
(- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2)))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(- (+ (* -2 (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(- (+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(- (+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))
(+ (* -2 (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))
(+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))
(+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))
(- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (+ lambda1 (* -1 lambda2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi1 2) (cos (- lambda2 lambda1)))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi1 2) (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(+ (* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2)))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (* phi1 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2)))))
(* phi1 (+ (* 1/2 (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2))))))
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* 1/2 (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))))))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (- (* phi1 (- (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1)))) (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (* -1 (sin phi2)))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1 (/ (* (sin phi2) (- (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1)))) (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (sin phi2)) (* 1/6 (sin phi2)))))) (* -1 (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1)))) (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (* -1 (sin phi2)))) (* (cos phi2) (cos (- lambda2 lambda1))))
(* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))
(+ (* (pow phi1 2) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (pow (sin phi2) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi1 2) (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (- (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* -1/3 (pow (sin phi2) 2))))) (pow (sin phi2) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi1 2) (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (- (+ (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (- (* -2/45 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 2/45 (pow (sin phi2) 2))))) (* -1/3 (pow (sin phi2) 2))))) (pow (sin phi2) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* phi1 (* phi2 (+ 1 (* -1/6 (pow phi2 2)))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* phi2 (+ 1 (* -1/6 (pow phi2 2)))))) (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
(* phi1 (+ (* phi2 (+ 1 (* -1/6 (pow phi2 2)))) (* (pow phi1 2) (+ (* -1/6 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))) (* 1/120 (* (pow phi1 2) (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))))))
(* phi1 (+ (* phi2 (+ 1 (* -1/6 (pow phi2 2)))) (* (pow phi1 2) (+ (* -1/6 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* phi2 (+ 1 (* -1/6 (pow phi2 2)))))) (* 1/120 (* phi2 (+ 1 (* -1/6 (pow phi2 2)))))))))))
(* phi1 (- (sin phi2) (* -1 (sin phi2))))
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (- (+ (* 1/120 (sin phi2)) (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* -1/120 (sin phi2))))) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(cos phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(+ (* -1 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (+ (* -2/45 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (sin phi1) (sin phi2))
(* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2))))
(* phi2 (* (sin phi1) (+ 1 (* -1/6 (pow phi2 2)))))
(- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))
(cos (- phi2 phi1))
(cos (+ phi1 phi2))
(+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* R (acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))
(- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(cos (+ phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(* 1/2 (- (cos (neg phi1)) (cos phi1)))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (* 1/2 (- (cos (neg phi1)) (cos phi1))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (* 1/2 (- (sin phi1) (sin (neg phi1)))))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (- (* phi2 (- (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1)))) (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1)))))))) (* -1 (sin phi1)))) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1 (/ (* (sin phi1) (- (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1)))) (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1)))))))) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (sin phi1)) (* 1/6 (sin phi1)))))) (* -1 (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1)))) (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1)))))))) (* -1 (sin phi1)))) (* (cos phi1) (cos (- lambda2 lambda1))))
(* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))
(+ (* (pow phi2 2) (- (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (pow (sin phi1) 2))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi2 2) (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (- (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* -1/3 (pow (sin phi1) 2))))) (pow (sin phi1) 2))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi2 2) (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (- (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (- (* -2/45 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 2/45 (pow (sin phi1) 2))))) (* -1/3 (pow (sin phi1) 2))))) (pow (sin phi1) 2))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(- (cos (neg phi1)) (cos phi1))
(- (+ (cos (neg phi1)) (* phi2 (- (sin phi1) (sin (neg phi1))))) (cos phi1))
(- (+ (cos (neg phi1)) (* phi2 (- (+ (sin phi1) (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (sin (neg phi1))))) (cos phi1))
(- (+ (cos (neg phi1)) (* phi2 (- (+ (sin phi1) (* phi2 (- (+ (* -1/2 (cos (neg phi1))) (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* -1/2 (cos phi1))))) (sin (neg phi1))))) (cos phi1))
(cos (neg phi1))
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(+ (* -1 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))))))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* -1/6 (* (pow phi2 3) (sin phi1)))
(* (pow phi2 3) (+ (* -1/6 (sin phi1)) (/ (sin phi1) (pow phi2 2))))
(+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* R (acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))
(* -1 (* (pow phi2 3) (+ (* -1 (/ (sin phi1) (pow phi2 2))) (* 1/6 (sin phi1)))))
(- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (- phi1 (* -1 phi2)))
Calls

15 calls:

TimeVariablePointExpression
30.0ms
lambda1
@-inf
((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (+ (* (* -1/6 phi2) phi2) 1) (* (sin phi1) phi2)) (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2))
25.0ms
phi2
@0
((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (+ (* (* -1/6 phi2) phi2) 1) (* (sin phi1) phi2)) (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2))
21.0ms
lambda2
@-inf
((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (+ (* (* -1/6 phi2) phi2) 1) (* (sin phi1) phi2)) (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2))
15.0ms
phi1
@inf
((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (+ (* (* -1/6 phi2) phi2) 1) (* (sin phi1) phi2)) (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2))
14.0ms
phi1
@-inf
((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (+ (* (* -1/6 phi2) phi2) 1) (* (sin phi1) phi2)) (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2))

simplify237.0ms (1.2%)

Memory
14.6MiB live, 336.2MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
09678791
134408368
083127983
Stop Event
iter limit
node limit
Counts
241 → 241
Calls
Call 1
Inputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos lambda2) (cos phi1))
(+ (* lambda1 (* (cos phi1) (sin lambda2))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(/ (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(- (+ (* lambda1 (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))) (/ (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (* lambda1 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))) (/ (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (+ (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))) (/ (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(- (+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))
(+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos (- lambda2 lambda1))
(cos (- lambda1 lambda2))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))
(- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (neg lambda1)))
(+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi1) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi1) (sin (neg lambda1))))))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))
(- (+ (* lambda2 (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))))
(- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* lambda2 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))))
(- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2)))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(- (+ (* -2 (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(- (+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(- (+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))
(+ (* -2 (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))
(+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))
(+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))
(- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (+ lambda1 (* -1 lambda2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi1 2) (cos (- lambda2 lambda1)))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi1 2) (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(+ (* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2)))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (* phi1 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2)))))
(* phi1 (+ (* 1/2 (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2))))))
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* 1/2 (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))))))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (- (* phi1 (- (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1)))) (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (* -1 (sin phi2)))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1 (/ (* (sin phi2) (- (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1)))) (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (sin phi2)) (* 1/6 (sin phi2)))))) (* -1 (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1)))) (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (* -1 (sin phi2)))) (* (cos phi2) (cos (- lambda2 lambda1))))
(* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))
(+ (* (pow phi1 2) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (pow (sin phi2) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi1 2) (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (- (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* -1/3 (pow (sin phi2) 2))))) (pow (sin phi2) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi1 2) (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (- (+ (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (- (* -2/45 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 2/45 (pow (sin phi2) 2))))) (* -1/3 (pow (sin phi2) 2))))) (pow (sin phi2) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* phi1 (* phi2 (+ 1 (* -1/6 (pow phi2 2)))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* phi2 (+ 1 (* -1/6 (pow phi2 2)))))) (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
(* phi1 (+ (* phi2 (+ 1 (* -1/6 (pow phi2 2)))) (* (pow phi1 2) (+ (* -1/6 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))) (* 1/120 (* (pow phi1 2) (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))))))
(* phi1 (+ (* phi2 (+ 1 (* -1/6 (pow phi2 2)))) (* (pow phi1 2) (+ (* -1/6 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* phi2 (+ 1 (* -1/6 (pow phi2 2)))))) (* 1/120 (* phi2 (+ 1 (* -1/6 (pow phi2 2)))))))))))
(* phi1 (- (sin phi2) (* -1 (sin phi2))))
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (- (+ (* 1/120 (sin phi2)) (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* -1/120 (sin phi2))))) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(cos phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(+ (* -1 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (+ (* -2/45 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (sin phi1) (sin phi2))
(* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2))))
(* phi2 (* (sin phi1) (+ 1 (* -1/6 (pow phi2 2)))))
(- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))
(cos (- phi2 phi1))
(cos (+ phi1 phi2))
(+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* R (acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))
(- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(cos (+ phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(* 1/2 (- (cos (neg phi1)) (cos phi1)))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (* 1/2 (- (cos (neg phi1)) (cos phi1))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (* 1/2 (- (sin phi1) (sin (neg phi1)))))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (- (* phi2 (- (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1)))) (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1)))))))) (* -1 (sin phi1)))) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1 (/ (* (sin phi1) (- (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1)))) (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1)))))))) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (sin phi1)) (* 1/6 (sin phi1)))))) (* -1 (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1)))) (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1)))))))) (* -1 (sin phi1)))) (* (cos phi1) (cos (- lambda2 lambda1))))
(* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))
(+ (* (pow phi2 2) (- (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (pow (sin phi1) 2))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi2 2) (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (- (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* -1/3 (pow (sin phi1) 2))))) (pow (sin phi1) 2))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi2 2) (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (- (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (- (* -2/45 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 2/45 (pow (sin phi1) 2))))) (* -1/3 (pow (sin phi1) 2))))) (pow (sin phi1) 2))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(- (cos (neg phi1)) (cos phi1))
(- (+ (cos (neg phi1)) (* phi2 (- (sin phi1) (sin (neg phi1))))) (cos phi1))
(- (+ (cos (neg phi1)) (* phi2 (- (+ (sin phi1) (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (sin (neg phi1))))) (cos phi1))
(- (+ (cos (neg phi1)) (* phi2 (- (+ (sin phi1) (* phi2 (- (+ (* -1/2 (cos (neg phi1))) (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* -1/2 (cos phi1))))) (sin (neg phi1))))) (cos phi1))
(cos (neg phi1))
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(+ (* -1 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))))))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* -1/6 (* (pow phi2 3) (sin phi1)))
(* (pow phi2 3) (+ (* -1/6 (sin phi1)) (/ (sin phi1) (pow phi2 2))))
(+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* R (acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))
(* -1 (* (pow phi2 3) (+ (* -1 (/ (sin phi1) (pow phi2 2))) (* 1/6 (sin phi1)))))
(- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (- phi1 (* -1 phi2)))
Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(*.f64 (acos.f64 (/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))) R)
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (neg.f64 lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))) lambda1 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (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)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1)) lambda1 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos lambda2) (cos phi1))
(*.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+ (* lambda1 (* (cos phi1) (sin lambda2))) (* (cos lambda2) (cos phi1)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi1))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))) lambda1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (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)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1)) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(/ (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(- (+ (* lambda1 (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))) (/ (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64)))) lambda1 (/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (* lambda1 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))) (/ (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (fma.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (cos.f64 lambda2)) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))) lambda1 (*.f64 (neg.f64 (cos.f64 phi1)) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64)))))) lambda1 (/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (+ (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))) (/ (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (fma.f64 (fma.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda2)) #s(literal -4/3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))))) (fma.f64 (cos.f64 phi1) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (cos.f64 lambda2)) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal -1/6 binary64)))) lambda1 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (cos.f64 lambda2)) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))))) lambda1 (*.f64 (neg.f64 (cos.f64 phi1)) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64)))))) lambda1 (/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(- (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 2 binary64) lambda1) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 lambda2)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)))))
(- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) lambda1 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 lambda1 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda2)) #s(literal -4/3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) lambda1)) lambda1 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))
(*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(fma.f64 (*.f64 #s(literal 2 binary64) lambda1) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 lambda2)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) lambda1))
(+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 lambda1 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda2)) #s(literal -4/3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) lambda1)) lambda1 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(fma.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(*.f64 (acos.f64 (/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))) R)
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(fma.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))
(*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi1) (cos (neg lambda1)))
(*.f64 (cos.f64 lambda1) (cos.f64 phi1))
(+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (* (cos phi1) (cos (neg lambda1))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi1)) (neg.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (* (cos phi1) (cos (neg lambda1))))
(fma.f64 (fma.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi1) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi1) (sin (neg lambda1))))))))) (* (cos phi1) (cos (neg lambda1))))
(fma.f64 (fma.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda1))) lambda2)) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(- (+ (* lambda2 (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda1)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64)))) lambda2 (/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* lambda2 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda1)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) lambda2 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda1)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))))) lambda2 (/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2)))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2))))) (/ (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (-.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (-.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda1)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (cos.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda1)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))))) (cos.f64 phi1)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda1)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64)))))) lambda2 (-.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda1))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda1)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) lambda2 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda1)))) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64))))) lambda2 (/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ (* -2 (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(fma.f64 (*.f64 #s(literal -2 binary64) lambda2) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(- (+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) lambda2 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(- (+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 lambda2 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) lambda2)) lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))
(*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ (* -2 (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))
(fma.f64 (*.f64 #s(literal -2 binary64) lambda2) (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 lambda2 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) lambda2)) lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(*.f64 (acos.f64 (/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))) R)
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (* (pow (sin phi1) 2) (pow (sin phi2) 2)))
(fma.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))
(*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi2)) phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) phi1 (sin.f64 phi2)) phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
(* phi1 (sin phi2))
(*.f64 (sin.f64 phi2) phi1)
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2)) phi1)
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (sin.f64 phi2)) phi1)
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi2))) (*.f64 phi1 phi1) (sin.f64 phi2)) phi1)
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) phi1 (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi1 2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi1 2) (cos (- lambda2 lambda1)))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* phi1 (+ (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2)))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 2 binary64) (sin.f64 phi2)))) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (* phi1 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64)) phi1))) phi1 (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64))) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2)))))
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) phi1) #s(literal 1/2 binary64))
(* phi1 (+ (* 1/2 (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (sin.f64 phi2) (*.f64 (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64)) (*.f64 phi1 phi1)))) phi1)
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) #s(literal -1/3 binary64) (*.f64 (*.f64 (sin.f64 phi2) #s(literal 1/60 binary64)) (*.f64 phi1 phi1)))) (*.f64 phi1 phi1) (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64))) phi1)
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* 1/2 (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) #s(literal 1/60 binary64) (*.f64 (*.f64 (sin.f64 phi2) #s(literal -1/2520 binary64)) (*.f64 phi1 phi1)))) (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64)) #s(literal 1/2 binary64))) (*.f64 phi1 phi1) (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64))) phi1)
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (- (* phi1 (- (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1)))) (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (* -1 (sin phi2)))) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (/.f64 #s(literal -1 binary64) (cos.f64 phi2)) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) phi1 (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1 (/ (* (sin phi2) (- (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1)))) (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (sin phi2)) (* 1/6 (sin phi2)))))) (* -1 (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1)))) (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (* -1 (sin phi2)))) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (fma.f64 (-.f64 (neg.f64 (fma.f64 (fma.f64 (neg.f64 (/.f64 (sin.f64 phi2) (cos.f64 phi2))) (/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (/.f64 #s(literal -1 binary64) (cos.f64 phi2)) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64))) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (fma.f64 (/.f64 #s(literal -1 binary64) (cos.f64 phi2)) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) phi1 (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))
(*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))
(+ (* (pow phi1 2) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (pow (sin phi2) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(fma.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
(+ (* (pow phi1 2) (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (- (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* -1/3 (pow (sin phi2) 2))))) (pow (sin phi2) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(fma.f64 (-.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/3 binary64) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)))) (*.f64 phi1 phi1))) (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
(+ (* (pow phi1 2) (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (- (+ (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (- (* -2/45 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 2/45 (pow (sin phi2) 2))))) (* -1/3 (pow (sin phi2) 2))))) (pow (sin phi2) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(fma.f64 (-.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)))) (*.f64 phi1 phi1) (*.f64 #s(literal 1/3 binary64) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))))) (*.f64 phi1 phi1))) (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
(+ (* -1/2 (* (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 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
(* phi1 (* phi2 (+ 1 (* -1/6 (pow phi2 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1)
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* phi2 (+ 1 (* -1/6 (pow phi2 2)))))) (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)) phi1)
(* phi1 (+ (* phi2 (+ 1 (* -1/6 (pow phi2 2)))) (* (pow phi1 2) (+ (* -1/6 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))) (* 1/120 (* (pow phi1 2) (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)) phi1)
(* phi1 (+ (* phi2 (+ 1 (* -1/6 (pow phi2 2)))) (* (pow phi1 2) (+ (* -1/6 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* phi2 (+ 1 (* -1/6 (pow phi2 2)))))) (* 1/120 (* phi2 (+ 1 (* -1/6 (pow phi2 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)) phi1)
(* phi1 (- (sin phi2) (* -1 (sin phi2))))
(*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) phi1)
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(*.f64 (fma.f64 (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64)) (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (sin.f64 phi2))) phi1)
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 phi2) #s(literal 1/60 binary64)) (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64))) (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (sin.f64 phi2))) phi1)
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (- (+ (* 1/120 (sin phi2)) (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* -1/120 (sin phi2))))) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 phi2) #s(literal -1/2520 binary64)) (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) #s(literal 1/60 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64))) (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (sin.f64 phi2))) phi1)
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(fma.f64 (sin.f64 phi2) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) phi1) #s(literal -1/2 binary64) (sin.f64 phi2)) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) phi1 (sin.f64 phi2)) phi1 (cos.f64 phi2))
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(fma.f64 (neg.f64 phi1) (sin.f64 phi2) (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi2) phi1) #s(literal -1/2 binary64)) (sin.f64 phi2)) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) phi1) (sin.f64 phi2)) phi1 (cos.f64 phi2))
(+ (* -1 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(fma.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64))) (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (+ (* -2/45 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 #s(literal -2/45 binary64) (*.f64 phi1 phi1) #s(literal 1/3 binary64))) (*.f64 phi1 phi1)) (*.f64 phi1 phi1)))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(* phi2 (* (sin phi1) (+ 1 (* -1/6 (pow phi2 2)))))
(*.f64 (*.f64 (sin.f64 phi1) phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))
(-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)) (sin.f64 phi1)) phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) phi2 (sin.f64 phi1)) phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))
(* phi2 (sin phi1))
(*.f64 (sin.f64 phi1) phi2)
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(*.f64 (*.f64 (sin.f64 phi1) phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64))) (*.f64 phi2 phi2) (sin.f64 phi1)) phi2)
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2) #s(literal 1/120 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi1))) (*.f64 phi2 phi2) (sin.f64 phi1)) phi2)
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))) phi2 (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) #s(literal 0 binary64))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) (+.f64 (sin.f64 phi1) (sin.f64 phi1)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) #s(literal 0 binary64)))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) phi2 (*.f64 (+.f64 (sin.f64 phi1) (sin.f64 phi1)) #s(literal 1/2 binary64))) phi2 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) #s(literal 0 binary64)))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal -1/6 binary64) (+.f64 (sin.f64 phi1) (sin.f64 phi1))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) phi2 (*.f64 (+.f64 (sin.f64 phi1) (sin.f64 phi1)) #s(literal 1/2 binary64))) phi2 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) #s(literal 0 binary64)))
(* 1/2 (- (cos (neg phi1)) (cos phi1)))
#s(literal 0 binary64)
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (* 1/2 (- (cos (neg phi1)) (cos phi1))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) (+.f64 (sin.f64 phi1) (sin.f64 phi1)) #s(literal 0 binary64))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (* 1/2 (- (sin phi1) (sin (neg phi1)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 0 binary64) phi2 (+.f64 (sin.f64 phi1) (sin.f64 phi1)))) phi2 #s(literal 0 binary64))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal -1/6 binary64) (+.f64 (sin.f64 phi1) (sin.f64 phi1))) #s(literal 0 binary64)) phi2 (*.f64 (+.f64 (sin.f64 phi1) (sin.f64 phi1)) #s(literal 1/2 binary64))) phi2 #s(literal 0 binary64))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (- (* phi2 (- (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1)))) (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1)))))))) (* -1 (sin phi1)))) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (/.f64 #s(literal -1 binary64) (cos.f64 phi1)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))) phi2 (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1 (/ (* (sin phi1) (- (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1)))) (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1)))))))) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (sin phi1)) (* 1/6 (sin phi1)))))) (* -1 (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1)))) (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1)))))))) (* -1 (sin phi1)))) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (fma.f64 (-.f64 (neg.f64 (fma.f64 (fma.f64 (neg.f64 (/.f64 (sin.f64 phi1) (cos.f64 phi1))) (/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (/.f64 #s(literal -1 binary64) (cos.f64 phi1)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(literal -1/3 binary64))) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (fma.f64 (/.f64 #s(literal -1 binary64) (cos.f64 phi1)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))) phi2 (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))
(*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ (* (pow phi2 2) (- (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (pow (sin phi1) 2))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(fma.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* (pow phi2 2) (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (- (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* -1/3 (pow (sin phi1) 2))))) (pow (sin phi1) 2))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(fma.f64 (-.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/3 binary64) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 phi2 phi2))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* (pow phi2 2) (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (- (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (- (* -2/45 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 2/45 (pow (sin phi1) 2))))) (* -1/3 (pow (sin phi1) 2))))) (pow (sin phi1) 2))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(fma.f64 (-.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 phi2 phi2) (*.f64 #s(literal 1/3 binary64) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (*.f64 phi2 phi2))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))
(- (cos (neg phi1)) (cos phi1))
#s(literal 0 binary64)
(- (+ (cos (neg phi1)) (* phi2 (- (sin phi1) (sin (neg phi1))))) (cos phi1))
(fma.f64 (+.f64 (sin.f64 phi1) (sin.f64 phi1)) phi2 #s(literal 0 binary64))
(- (+ (cos (neg phi1)) (* phi2 (- (+ (sin phi1) (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (sin (neg phi1))))) (cos phi1))
(-.f64 (fma.f64 (fma.f64 #s(literal 0 binary64) phi2 (+.f64 (sin.f64 phi1) (sin.f64 phi1))) phi2 (cos.f64 phi1)) (cos.f64 phi1))
(- (+ (cos (neg phi1)) (* phi2 (- (+ (sin phi1) (* phi2 (- (+ (* -1/2 (cos (neg phi1))) (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* -1/2 (cos phi1))))) (sin (neg phi1))))) (cos phi1))
(-.f64 (fma.f64 (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (+.f64 (sin.f64 phi1) (sin.f64 phi1))) phi2 #s(literal 0 binary64)) phi2 (sin.f64 phi1)) (sin.f64 phi1)) phi2 (cos.f64 phi1)) (cos.f64 phi1))
(cos (neg phi1))
(cos.f64 phi1)
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(fma.f64 (neg.f64 phi2) (neg.f64 (sin.f64 phi1)) (cos.f64 phi1))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 phi1) (sin.f64 phi1)) phi2 (cos.f64 phi1))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi2) (neg.f64 (sin.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) phi2 (sin.f64 phi1)) phi2 (cos.f64 phi1))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(fma.f64 (neg.f64 phi2) (sin.f64 phi1) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) phi2) #s(literal -1/2 binary64)) (sin.f64 phi1)) phi2 (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 phi1) phi2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) phi2) (sin.f64 phi1)) phi2 (cos.f64 phi1))
(+ (* -1 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(*.f64 (fma.f64 (neg.f64 phi2) phi2 #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(fma.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (*.f64 phi2 phi2) #s(literal -1 binary64))) (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))))))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(fma.f64 (fma.f64 (neg.f64 phi2) phi2 #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 #s(literal -2/45 binary64) (*.f64 phi2 phi2) #s(literal 1/3 binary64))) (*.f64 phi2 phi2)) (*.f64 phi2 phi2)))
(* -1/6 (* (pow phi2 3) (sin phi1)))
(*.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 3 binary64))) (sin.f64 phi1))
(* (pow phi2 3) (+ (* -1/6 (sin phi1)) (/ (sin phi1) (pow phi2 2))))
(*.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (/.f64 (sin.f64 phi1) (*.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 3 binary64)))
(+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(* -1 (* (pow phi2 3) (+ (* -1 (/ (sin phi1) (pow phi2 2))) (* 1/6 (sin phi1)))))
(*.f64 (neg.f64 (pow.f64 phi2 #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (sin.f64 phi1) (/.f64 (neg.f64 (sin.f64 phi1)) (*.f64 phi2 phi2))))
(- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))

rewrite297.0ms (1.5%)

Memory
-9.2MiB live, 527.5MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
069543
0119432
1453432
23529432
08729417
Stop Event
iter limit
node limit
iter limit
Counts
28 → 737
Calls
Call 1
Inputs
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2)))
(+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (+.f64 phi2 phi1))
(pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))
Outputs
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (cos.f64 phi2)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (fma.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(neg.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 1 binary64))))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.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)))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (-.f64 lambda2 lambda1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.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)))) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda2 lambda1)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 phi1 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 phi1 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1)))))) #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 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1))) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1))) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (-.f64 lambda2 lambda1)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.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 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.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 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) phi1)) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) phi1)) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi1))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (neg.f64 phi1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (neg.f64 phi1) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (neg.f64 phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 phi1 (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 phi1 (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
(fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 1 binary64)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
(-.f64 (/.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) (*.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (cos.f64 phi2)))
(-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))) R)
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (cos.f64 phi2)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (fma.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(neg.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 1 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (cos.f64 phi2)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64)))) (neg.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (cos.f64 phi2) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (fabs.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (fabs.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (fabs.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (fabs.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (exp.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) (exp.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (exp.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) (exp.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64)) (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64)) (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64)))))
(-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 1 binary64)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 1 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 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 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.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 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #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 lambda1)) (cos.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.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 lambda1)) (cos.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (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 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #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 lambda1)) (cos.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.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 lambda1)) (cos.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (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 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 phi1)) phi2)
(*.f64 (*.f64 phi2 (sin.f64 phi1)) (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 phi2 (sin.f64 phi1)))
(*.f64 phi2 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 phi2 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 phi2 (sin.f64 phi1))) (-.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2) #s(literal 1 binary64)))
(/.f64 (*.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (*.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1 binary64)) (*.f64 phi2 (sin.f64 phi1))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2)))
(/.f64 (*.f64 (*.f64 phi2 (sin.f64 phi1)) (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2) #s(literal 2 binary64)) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2) #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 phi2 (sin.f64 phi1)) (fma.f64 #s(literal -1/216 binary64) (pow.f64 (*.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2)))
(fma.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2) (*.f64 phi2 (sin.f64 phi1)) (*.f64 #s(literal 1 binary64) (*.f64 phi2 (sin.f64 phi1))))
(fma.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2) (*.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 1 binary64) (*.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2)))
(fma.f64 #s(literal 1 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2) (*.f64 phi2 (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2) (*.f64 phi2 (sin.f64 phi1))) (*.f64 #s(literal 1 binary64) (*.f64 phi2 (sin.f64 phi1))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 phi2 (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2) (*.f64 phi2 (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2)) (*.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 1 binary64)) (*.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2)))
(*.f64 (*.f64 #s(literal -2 binary64) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) #s(literal -2 binary64))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 phi2 phi1))) (neg.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 phi2 phi1))) (neg.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 phi2 phi1))) (neg.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 phi2 phi1))) (neg.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 phi2 phi1))) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 phi2 phi1))) (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (-.f64 phi1 phi2)) (neg.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (neg.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (-.f64 phi1 phi2)) (neg.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (neg.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (-.f64 phi1 phi2)) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (-.f64 phi2 phi1)) (neg.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi2 phi1)) (neg.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (neg.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 phi1 phi2) (neg.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 phi2 phi1) (neg.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 phi2 phi1) (neg.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (-.f64 phi2 phi1)) (neg.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi2 phi1)) (neg.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (neg.f64 (-.f64 phi2 phi1)) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi2 phi1)) (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 phi2 phi1) (neg.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 phi2 phi1) (neg.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (neg.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 phi1 phi2) (neg.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 phi1 phi2) (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (-.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (-.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.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 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (-.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 phi2 phi1))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))
(+.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 phi2 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (+.f64 phi2 phi1)))
(fma.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 (-.f64 phi2 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(sin.f64 (+.f64 (neg.f64 (-.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 phi2 phi1))))
(cos.f64 (neg.f64 (-.f64 phi1 phi2)))
(cos.f64 (neg.f64 (-.f64 phi2 phi1)))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(+.f64 (*.f64 (sin.f64 (-.f64 phi2 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi1 phi2)))
(fma.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(sin.f64 (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi2 phi1)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 phi2 phi1))))
(cos.f64 (neg.f64 (+.f64 phi2 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(+.f64 (-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (cos.f64 phi2))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (fabs.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (fabs.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(*.f64 (exp.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) (exp.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(pow.f64 (exp.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 2 binary64))))

eval214.0ms (1.1%)

Memory
44.6MiB live, 515.1MiB allocated
Compiler

Compiled 52 602 to 6 068 computations (88.5% saved)

prune136.0ms (0.7%)

Memory
-6.6MiB live, 290.5MiB allocated
Pruning

71 alts after pruning (70 fresh and 1 done)

PrunedKeptTotal
New977581 035
Fresh141226
Picked415
Done000
Total995711 066
Accuracy
94.0%
Counts
1 066 → 71
Alt Table
Click to see full alt table
StatusAccuracyProgram
70.3%
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) R)
70.4%
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) R)
70.5%
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
40.8%
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))) R)
70.4%
(*.f64 (-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))) R)
70.4%
(*.f64 (-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
70.6%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
37.5%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))) R)
40.9%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
70.4%
(*.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))) R)
51.5%
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))) R)
70.7%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
69.7%
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
52.0%
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
70.6%
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))) R)
33.0%
(*.f64 (acos.f64 (/.f64 (-.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
70.6%
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))) R)
37.5%
(*.f64 (acos.f64 (/.f64 (+.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 2 binary64))))) R)
37.6%
(*.f64 (acos.f64 (/.f64 #s(approx (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
56.4%
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
25.9%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (sin.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
56.4%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (fma.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
40.0%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
40.3%
(*.f64 (acos.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
93.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))) R)
51.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 2 binary64)))) R)
56.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
34.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64)))))) R)
93.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
93.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))) R)
38.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
38.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)
56.4%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
25.9%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
27.0%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
55.4%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi2) phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
40.9%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi2) phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
70.5%
(*.f64 (acos.f64 (*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) R)
33.1%
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
34.6%
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
40.2%
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
42.1%
(*.f64 (acos.f64 #s(approx (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)
42.9%
(*.f64 (acos.f64 #s(approx (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)
93.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
51.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
53.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
52.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
53.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
33.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
31.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
53.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1))))) R)
19.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.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)))) R)
18.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
18.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
19.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
19.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
30.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64)))) R)
53.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))) R)
40.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
53.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
53.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #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 lambda1)) (cos.f64 lambda2))))) (cos.f64 phi1)))) R)
53.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (-.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 lambda1)) (cos.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))) (cos.f64 phi1)))) R)
23.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
23.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
20.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
23.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
22.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
23.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
29.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
30.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
15.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
Compiler

Compiled 6 489 to 3 925 computations (39.5% saved)

simplify163.0ms (0.8%)

Memory
-24.1MiB live, 207.4MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
cost-diff0
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))) R)
cost-diff15
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
cost-diff0
(/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
cost-diff0
(acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
cost-diff1
(+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
cost-diff0
(acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
cost-diff1
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
cost-diff0
(fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
cost-diff0
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
cost-diff0
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
089917
0135911
1260911
2569911
31600851
44502851
08109839
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(cos.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)
(cos.f64 phi2)
phi2
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 phi1 phi1)
phi1
#s(literal 1 binary64)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1)))
#s(approx (cos (- phi2 phi1)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
phi1
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1))
(-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
lambda1
(sin.f64 lambda2)
lambda2
#s(literal 2 binary64)
(pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda1)
(cos.f64 lambda2)
(cos.f64 phi1)
phi1
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))
(neg.f64 (cos.f64 lambda1))
R
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (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 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda2)
(sin.f64 lambda1)
(cos.f64 phi2)
phi2
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi2)
(sin.f64 phi1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 phi1 phi1)
phi1
#s(literal 1 binary64)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) R)
(acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1)))
#s(approx (cos (- phi2 phi1)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
phi1
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 phi1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 phi1))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 phi1)))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1))
(*.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))) (cos.f64 phi1))
(-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))
(-.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)))
(pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
lambda1
(sin.f64 lambda2)
lambda2
#s(literal 2 binary64)
(pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))
(pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda1)
(cos.f64 lambda2)
(cos.f64 phi1)
phi1
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))
(neg.f64 (cos.f64 lambda1))
R

localize595.0ms (3%)

Memory
18.2MiB live, 1 459.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.30697250976844204
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
accuracy0.38119125976844204
(pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))
accuracy3.8222422152005495
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
accuracy28.172760250518753
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
accuracy13.539378072047475
(cos.f64 (+.f64 phi2 phi1))
accuracy16.835371506797607
(cos.f64 (-.f64 lambda1 lambda2))
accuracy29.255385298417192
#s(approx (cos (- phi2 phi1)) (cos.f64 phi2))
accuracy38.53665595694353
(-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1)))
accuracy0.26171875
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
accuracy3.8222422152005495
(acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy16.835371506797607
(cos.f64 (-.f64 lambda1 lambda2))
accuracy53.457320074109816
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
accuracy3.8222422152005495
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
accuracy16.835371506797607
(cos.f64 (-.f64 lambda1 lambda2))
accuracy28.172760250518753
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy32.25607230221291
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy0.1953125
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
accuracy0.21484375
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
accuracy0.26171875
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
accuracy3.8222422152005495
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
Samples
485.0ms253×1valid
5.0ms2valid
Compiler

Compiled 670 to 65 computations (90.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 422.0ms
ival-cos: 166.0ms (39.3% of total)
ival-sin: 67.0ms (15.9% of total)
ival-mult: 61.0ms (14.5% of total)
adjust: 40.0ms (9.5% of total)
ival-acos: 28.0ms (6.6% of total)
ival-add: 24.0ms (5.7% of total)
ival-sub: 13.0ms (3.1% of total)
ival-pow2: 12.0ms (2.8% of total)
ival-div: 10.0ms (2.4% of total)
ival-neg: 2.0ms (0.5% of total)
exact: 1.0ms (0.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series86.0ms (0.4%)

Memory
-13.1MiB live, 175.3MiB allocated
Counts
27 → 177
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
(+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #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 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1)))
#s(approx (cos (- phi2 phi1)) (cos.f64 phi2))
(cos.f64 (+.f64 phi2 phi1))
(pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))
Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos lambda2) (cos phi1))
(+ (* lambda1 (* (cos phi1) (sin lambda2))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ (* lambda1 (- (* lambda1 (- (* -1 (/ (* (cos phi1) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2)))) (cos lambda2))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi1)))))) (* -1 (* (cos phi1) (sin lambda2))))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (- (* lambda1 (- (+ (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (* -1 (/ (* (cos phi1) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2)))) (cos lambda2))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi1)))))) (cos lambda2))) (+ (* -1/2 (* (cos phi1) (sin lambda2))) (* 1/6 (* (cos phi1) (sin lambda2))))))) (* -1 (/ (* (cos phi1) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2)))) (cos lambda2)))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi1)))))) (* -1 (* (cos phi1) (sin lambda2))))) (* (cos lambda2) (cos phi1)))
(* lambda1 (sin lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(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)))))
(pow (cos lambda2) 2)
(+ (* -1 (* (pow lambda1 2) (pow (cos lambda2) 2))) (pow (cos lambda2) 2))
(+ (* (pow lambda1 2) (+ (* -1 (pow (cos lambda2) 2)) (* 1/3 (* (pow lambda1 2) (pow (cos lambda2) 2))))) (pow (cos lambda2) 2))
(+ (* (pow lambda1 2) (+ (* -1 (pow (cos lambda2) 2)) (* (pow lambda1 2) (+ (* -2/45 (* (pow lambda1 2) (pow (cos lambda2) 2))) (* 1/3 (pow (cos lambda2) 2)))))) (pow (cos lambda2) 2))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))
(* (sin lambda1) (sin lambda2))
(cos (- lambda1 lambda2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (neg lambda1)))
(+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi1) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi1) (sin (neg lambda1))))))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(* (cos lambda1) (cos phi1))
(+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (- (* lambda2 (- (* -1 (/ (* (cos phi1) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2)))) (cos lambda1))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi1)))))) (* -1 (* (cos phi1) (sin lambda1))))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (- (* lambda2 (- (+ (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (* (cos phi1) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2)))) (cos lambda1))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi1)))))) (cos lambda1))) (+ (* -1/2 (* (cos phi1) (sin lambda1))) (* 1/6 (* (cos phi1) (sin lambda1))))))) (* -1 (/ (* (cos phi1) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2)))) (cos lambda1)))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi1)))))) (* -1 (* (cos phi1) (sin lambda1))))) (* (cos lambda1) (cos phi1)))
(* lambda2 (sin lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(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)))))
(pow (cos lambda1) 2)
(+ (* -1 (* (pow lambda2 2) (pow (cos lambda1) 2))) (pow (cos lambda1) 2))
(+ (* (pow lambda2 2) (+ (* -1 (pow (cos lambda1) 2)) (* 1/3 (* (pow lambda2 2) (pow (cos lambda1) 2))))) (pow (cos lambda1) 2))
(+ (* (pow lambda2 2) (+ (* -1 (pow (cos lambda1) 2)) (* (pow lambda2 2) (+ (* -2/45 (* (pow lambda2 2) (pow (cos lambda1) 2))) (* 1/3 (pow (cos lambda1) 2)))))) (pow (cos lambda1) 2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi1 2) (cos (- lambda2 lambda1)))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi1 2) (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(+ (* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2)))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (* phi1 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2)))))
(* phi1 (+ (* 1/2 (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2))))))
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* 1/2 (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))))))))
(/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))
(- (+ (* -1/2 (/ (* (pow phi1 2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2)))))
(- (+ (* (pow phi1 2) (+ (* -1/2 (/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (/ (* (pow phi1 2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2)))))
(- (+ (* (pow phi1 2) (+ (* -1/2 (/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (/ (* (pow phi1 2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2)))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* phi1 (- (sin phi2) (* -1 (sin phi2))))
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (- (+ (* 1/120 (sin phi2)) (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* -1/120 (sin phi2))))) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(cos phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2))))
(* (sin phi1) (sin phi2))
(- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))
(cos (- phi2 phi1))
(cos (+ phi1 phi2))
(+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* R (acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))
(- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(cos (+ phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(* 1/2 (- (cos (neg phi1)) (cos phi1)))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (* 1/2 (- (cos (neg phi1)) (cos phi1))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (* 1/2 (- (sin phi1) (sin (neg phi1)))))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(- (cos (neg phi1)) (cos phi1))
(- (+ (cos (neg phi1)) (* phi2 (- (sin phi1) (sin (neg phi1))))) (cos phi1))
(- (+ (cos (neg phi1)) (* phi2 (- (+ (sin phi1) (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (sin (neg phi1))))) (cos phi1))
(- (+ (cos (neg phi1)) (* phi2 (- (+ (sin phi1) (* phi2 (- (+ (* -1/2 (cos (neg phi1))) (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* -1/2 (cos phi1))))) (sin (neg phi1))))) (cos phi1))
(cos (neg phi1))
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* R (acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))
(- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (- phi1 (* -1 phi2)))
Calls

15 calls:

TimeVariablePointExpression
11.0ms
lambda1
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (cos phi1)) (* (sin phi2) (sin phi1))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (/ (* (- (pow (* (sin lambda1) (sin lambda2)) 2) (pow (* (cos lambda1) (cos lambda2)) 2)) (cos phi1)) (+ (* (sin lambda1) (sin lambda2)) (* (neg (cos lambda1)) (cos lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi2) (sin phi1)) (* (sin lambda2) (sin lambda1)) (cos (- lambda1 lambda2)) (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (pow (* (cos lambda1) (cos lambda2)) 2))
10.0ms
phi1
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (cos phi1)) (* (sin phi2) (sin phi1))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (/ (* (- (pow (* (sin lambda1) (sin lambda2)) 2) (pow (* (cos lambda1) (cos lambda2)) 2)) (cos phi1)) (+ (* (sin lambda1) (sin lambda2)) (* (neg (cos lambda1)) (cos lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi2) (sin phi1)) (* (sin lambda2) (sin lambda1)) (cos (- lambda1 lambda2)) (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (pow (* (cos lambda1) (cos lambda2)) 2))
10.0ms
lambda2
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (cos phi1)) (* (sin phi2) (sin phi1))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (/ (* (- (pow (* (sin lambda1) (sin lambda2)) 2) (pow (* (cos lambda1) (cos lambda2)) 2)) (cos phi1)) (+ (* (sin lambda1) (sin lambda2)) (* (neg (cos lambda1)) (cos lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi2) (sin phi1)) (* (sin lambda2) (sin lambda1)) (cos (- lambda1 lambda2)) (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (pow (* (cos lambda1) (cos lambda2)) 2))
8.0ms
lambda2
@-inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (cos phi1)) (* (sin phi2) (sin phi1))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (/ (* (- (pow (* (sin lambda1) (sin lambda2)) 2) (pow (* (cos lambda1) (cos lambda2)) 2)) (cos phi1)) (+ (* (sin lambda1) (sin lambda2)) (* (neg (cos lambda1)) (cos lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi2) (sin phi1)) (* (sin lambda2) (sin lambda1)) (cos (- lambda1 lambda2)) (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (pow (* (cos lambda1) (cos lambda2)) 2))
8.0ms
lambda1
@-inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (cos phi1)) (* (sin phi2) (sin phi1))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (/ (* (- (pow (* (sin lambda1) (sin lambda2)) 2) (pow (* (cos lambda1) (cos lambda2)) 2)) (cos phi1)) (+ (* (sin lambda1) (sin lambda2)) (* (neg (cos lambda1)) (cos lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi2) (sin phi1)) (* (sin lambda2) (sin lambda1)) (cos (- lambda1 lambda2)) (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (pow (* (cos lambda1) (cos lambda2)) 2))

simplify196.0ms (1%)

Memory
28.8MiB live, 256.8MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06854097
125413824
085203559
Stop Event
iter limit
node limit
Counts
177 → 177
Calls
Call 1
Inputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos lambda2) (cos phi1))
(+ (* lambda1 (* (cos phi1) (sin lambda2))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ (* lambda1 (- (* lambda1 (- (* -1 (/ (* (cos phi1) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2)))) (cos lambda2))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi1)))))) (* -1 (* (cos phi1) (sin lambda2))))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (- (* lambda1 (- (+ (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (* -1 (/ (* (cos phi1) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2)))) (cos lambda2))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi1)))))) (cos lambda2))) (+ (* -1/2 (* (cos phi1) (sin lambda2))) (* 1/6 (* (cos phi1) (sin lambda2))))))) (* -1 (/ (* (cos phi1) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2)))) (cos lambda2)))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi1)))))) (* -1 (* (cos phi1) (sin lambda2))))) (* (cos lambda2) (cos phi1)))
(* lambda1 (sin lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(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)))))
(pow (cos lambda2) 2)
(+ (* -1 (* (pow lambda1 2) (pow (cos lambda2) 2))) (pow (cos lambda2) 2))
(+ (* (pow lambda1 2) (+ (* -1 (pow (cos lambda2) 2)) (* 1/3 (* (pow lambda1 2) (pow (cos lambda2) 2))))) (pow (cos lambda2) 2))
(+ (* (pow lambda1 2) (+ (* -1 (pow (cos lambda2) 2)) (* (pow lambda1 2) (+ (* -2/45 (* (pow lambda1 2) (pow (cos lambda2) 2))) (* 1/3 (pow (cos lambda2) 2)))))) (pow (cos lambda2) 2))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))
(* (sin lambda1) (sin lambda2))
(cos (- lambda1 lambda2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (neg lambda1)))
(+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi1) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi1) (sin (neg lambda1))))))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(* (cos lambda1) (cos phi1))
(+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (- (* lambda2 (- (* -1 (/ (* (cos phi1) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2)))) (cos lambda1))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi1)))))) (* -1 (* (cos phi1) (sin lambda1))))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (- (* lambda2 (- (+ (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (* (cos phi1) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2)))) (cos lambda1))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi1)))))) (cos lambda1))) (+ (* -1/2 (* (cos phi1) (sin lambda1))) (* 1/6 (* (cos phi1) (sin lambda1))))))) (* -1 (/ (* (cos phi1) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2)))) (cos lambda1)))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi1)))))) (* -1 (* (cos phi1) (sin lambda1))))) (* (cos lambda1) (cos phi1)))
(* lambda2 (sin lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(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)))))
(pow (cos lambda1) 2)
(+ (* -1 (* (pow lambda2 2) (pow (cos lambda1) 2))) (pow (cos lambda1) 2))
(+ (* (pow lambda2 2) (+ (* -1 (pow (cos lambda1) 2)) (* 1/3 (* (pow lambda2 2) (pow (cos lambda1) 2))))) (pow (cos lambda1) 2))
(+ (* (pow lambda2 2) (+ (* -1 (pow (cos lambda1) 2)) (* (pow lambda2 2) (+ (* -2/45 (* (pow lambda2 2) (pow (cos lambda1) 2))) (* 1/3 (pow (cos lambda1) 2)))))) (pow (cos lambda1) 2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi1 2) (cos (- lambda2 lambda1)))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi1 2) (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(+ (* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2)))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (* phi1 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2)))))
(* phi1 (+ (* 1/2 (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2))))))
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* 1/2 (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))))))))
(/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))
(- (+ (* -1/2 (/ (* (pow phi1 2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2)))))
(- (+ (* (pow phi1 2) (+ (* -1/2 (/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (/ (* (pow phi1 2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2)))))
(- (+ (* (pow phi1 2) (+ (* -1/2 (/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (/ (* (pow phi1 2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2)))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* phi1 (- (sin phi2) (* -1 (sin phi2))))
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (- (+ (* 1/120 (sin phi2)) (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* -1/120 (sin phi2))))) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(cos phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2))))
(* (sin phi1) (sin phi2))
(- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))
(cos (- phi2 phi1))
(cos (+ phi1 phi2))
(+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* R (acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))
(- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(cos (+ phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(* 1/2 (- (cos (neg phi1)) (cos phi1)))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (* 1/2 (- (cos (neg phi1)) (cos phi1))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (* 1/2 (- (sin phi1) (sin (neg phi1)))))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(- (cos (neg phi1)) (cos phi1))
(- (+ (cos (neg phi1)) (* phi2 (- (sin phi1) (sin (neg phi1))))) (cos phi1))
(- (+ (cos (neg phi1)) (* phi2 (- (+ (sin phi1) (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (sin (neg phi1))))) (cos phi1))
(- (+ (cos (neg phi1)) (* phi2 (- (+ (sin phi1) (* phi2 (- (+ (* -1/2 (cos (neg phi1))) (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* -1/2 (cos phi1))))) (sin (neg phi1))))) (cos phi1))
(cos (neg phi1))
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* R (acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))
(- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (- phi1 (* -1 phi2)))
Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))) lambda1)) lambda1 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (neg.f64 lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1)) lambda1 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos lambda2) (cos phi1))
(*.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+ (* lambda1 (* (cos phi1) (sin lambda2))) (* (cos lambda2) (cos phi1)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi1))) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(fma.f64 (*.f64 lambda1 (neg.f64 (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1)) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(+ (* lambda1 (- (* lambda1 (- (* -1 (/ (* (cos phi1) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2)))) (cos lambda2))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi1)))))) (* -1 (* (cos phi1) (sin lambda2))))) (* (cos lambda2) (cos phi1)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda2) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 lambda2)) (/.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 phi1)) (cos.f64 lambda2))) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi1))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* lambda1 (- (* lambda1 (- (+ (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (* -1 (/ (* (cos phi1) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2)))) (cos lambda2))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi1)))))) (cos lambda2))) (+ (* -1/2 (* (cos phi1) (sin lambda2))) (* 1/6 (* (cos phi1) (sin lambda2))))))) (* -1 (/ (* (cos phi1) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2)))) (cos lambda2)))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi1)))))) (* -1 (* (cos phi1) (sin lambda2))))) (* (cos lambda2) (cos phi1)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda2) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 lambda2)) (/.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 phi1)) (cos.f64 lambda2))) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi1))) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) #s(literal -1/3 binary64)))) lambda1 (/.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda2) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 lambda2))) (/.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 phi1)) (cos.f64 lambda2))) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi1))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (sin.f64 lambda2)) lambda1)
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (sin.f64 lambda2)) lambda1)
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda2))) (*.f64 lambda1 lambda1) (sin.f64 lambda2)) lambda1)
(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 (-.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) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(pow (cos lambda2) 2)
(pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))
(+ (* -1 (* (pow lambda1 2) (pow (cos lambda2) 2))) (pow (cos lambda2) 2))
(*.f64 (fma.f64 (neg.f64 lambda1) lambda1 #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(+ (* (pow lambda1 2) (+ (* -1 (pow (cos lambda2) 2)) (* 1/3 (* (pow lambda1 2) (pow (cos lambda2) 2))))) (pow (cos lambda2) 2))
(fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (*.f64 lambda1 lambda1) #s(literal -1 binary64))) (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(+ (* (pow lambda1 2) (+ (* -1 (pow (cos lambda2) 2)) (* (pow lambda1 2) (+ (* -2/45 (* (pow lambda1 2) (pow (cos lambda2) 2))) (* 1/3 (pow (cos lambda2) 2)))))) (pow (cos lambda2) 2))
(fma.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (*.f64 lambda1 lambda1) #s(literal 1/3 binary64))) (*.f64 lambda1 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (cos.f64 phi1)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2)) lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi1) (cos (neg lambda1)))
(*.f64 (cos.f64 lambda1) (cos.f64 phi1))
(+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (* (cos phi1) (cos (neg lambda1))))
(fma.f64 (*.f64 (neg.f64 lambda2) (neg.f64 (sin.f64 lambda1))) (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (* (cos phi1) (cos (neg lambda1))))
(fma.f64 (fma.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 phi1) (*.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (cos.f64 lambda1))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi1) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi1) (sin (neg lambda1))))))))) (* (cos phi1) (cos (neg lambda1))))
(fma.f64 (fma.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 phi1) (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1))) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda1))) lambda2)) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2)) lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(* (cos lambda1) (cos phi1))
(*.f64 (cos.f64 lambda1) (cos.f64 phi1))
(+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1)))
(fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (- (* lambda2 (- (* -1 (/ (* (cos phi1) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2)))) (cos lambda1))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi1)))))) (* -1 (* (cos phi1) (sin lambda1))))) (* (cos lambda1) (cos phi1)))
(fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (/.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (fma.f64 (neg.f64 (cos.f64 phi1)) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda1)))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi1))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (- (* lambda2 (- (+ (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (* (cos phi1) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2)))) (cos lambda1))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi1)))))) (cos lambda1))) (+ (* -1/2 (* (cos phi1) (sin lambda1))) (* 1/6 (* (cos phi1) (sin lambda1))))))) (* -1 (/ (* (cos phi1) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2)))) (cos lambda1)))) (+ (* -1 (/ (* (cos phi1) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi1)))))) (* -1 (* (cos phi1) (sin lambda1))))) (* (cos lambda1) (cos phi1)))
(fma.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda1)) (/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (/.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (fma.f64 (neg.f64 (cos.f64 phi1)) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda1)))) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) #s(literal -1/3 binary64)))) (neg.f64 lambda2)) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (/.f64 (cos.f64 phi1) (cos.f64 lambda1)) (fma.f64 (neg.f64 (cos.f64 phi1)) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda1))))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi1))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(* lambda2 (sin lambda1))
(*.f64 (sin.f64 lambda1) lambda2)
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1)) lambda2)
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1)) lambda2)
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda1))) (*.f64 lambda2 lambda2) (sin.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 #s(literal -1/6 binary64) (sin.f64 lambda1)) lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(pow (cos lambda1) 2)
(pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))
(+ (* -1 (* (pow lambda2 2) (pow (cos lambda1) 2))) (pow (cos lambda1) 2))
(*.f64 (fma.f64 (neg.f64 lambda2) lambda2 #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))
(+ (* (pow lambda2 2) (+ (* -1 (pow (cos lambda1) 2)) (* 1/3 (* (pow lambda2 2) (pow (cos lambda1) 2))))) (pow (cos lambda1) 2))
(fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (*.f64 lambda2 lambda2) #s(literal -1 binary64))) (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))
(+ (* (pow lambda2 2) (+ (* -1 (pow (cos lambda1) 2)) (* (pow lambda2 2) (+ (* -2/45 (* (pow lambda2 2) (pow (cos lambda1) 2))) (* 1/3 (pow (cos lambda1) 2)))))) (pow (cos lambda1) 2))
(fma.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (*.f64 lambda2 lambda2) #s(literal 1/3 binary64))) (*.f64 lambda2 lambda2) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 phi1 #s(literal -1/2 binary64)) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (sin.f64 phi2)) phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi1 (sin.f64 phi2)) phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (*.f64 phi1 #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))) phi1 (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi1 2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi1 2) (cos (- lambda2 lambda1)))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(+ (* phi1 (+ (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2)))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 2 binary64) (sin.f64 phi2)))) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (* phi1 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))) phi1 (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64))) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2)))))
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64)) phi1)
(* phi1 (+ (* 1/2 (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 phi2) phi1) phi1) #s(literal -1/3 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 phi2)))) phi1)
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64))) phi1)
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* 1/2 (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi2) phi1) phi1) #s(literal -1/2520 binary64) (*.f64 (sin.f64 phi2) #s(literal 1/60 binary64))) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi2))) (*.f64 phi1 phi1) (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64))) phi1)
(/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(- (+ (* -1/2 (/ (* (pow phi1 2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2)))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(- (+ (* (pow phi1 2) (+ (* -1/2 (/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (/ (* (pow phi1 2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi1 phi1) (/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(- (+ (* (pow phi1 2) (+ (* -1/2 (/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (/ (* (pow phi1 2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (+ (* -1 (* (cos lambda1) (cos lambda2))) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi1 phi1) (*.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(* phi1 (sin phi2))
(*.f64 (sin.f64 phi2) phi1)
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (sin.f64 phi2)) phi1)
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi2))) (*.f64 phi1 phi1) (sin.f64 phi2)) phi1)
(* phi1 (- (sin phi2) (* -1 (sin phi2))))
(*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) phi1)
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi2) phi1) phi1) #s(literal -1/3 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 phi2))) phi1)
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi2) phi1) phi1) #s(literal 1/60 binary64) (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64))) phi1) phi1 (*.f64 #s(literal 2 binary64) (sin.f64 phi2))) phi1)
(* phi1 (- (+ (sin phi2) (* (pow phi1 2) (- (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (- (+ (* 1/120 (sin phi2)) (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* -1/120 (sin phi2))))) (* 1/6 (sin phi2))))) (* -1 (sin phi2))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi2) phi1) phi1) #s(literal -1/2520 binary64) (*.f64 (sin.f64 phi2) #s(literal 1/60 binary64))) phi1) phi1 (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64))) (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (sin.f64 phi2))) phi1)
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(fma.f64 (sin.f64 phi2) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) phi1) #s(literal -1/2 binary64) (sin.f64 phi2)) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 phi2)) phi1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) phi1 (sin.f64 phi2)) phi1 (cos.f64 phi2))
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(fma.f64 (neg.f64 phi1) (sin.f64 phi2) (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi2) phi1) #s(literal -1/2 binary64)) (sin.f64 phi2)) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (sin.f64 phi2)) phi1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) phi1) (sin.f64 phi2)) phi1 (cos.f64 phi2))
(* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))
(-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (sin.f64 phi1)) phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi2 (sin.f64 phi1)) phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))) phi2 (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1) #s(literal 0 binary64))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1) #s(literal 0 binary64)))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64)) phi2 (*.f64 (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) #s(literal 1/2 binary64))) phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1) #s(literal 0 binary64)))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) #s(literal -1/6 binary64)) (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64))) phi2 (*.f64 (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) #s(literal 1/2 binary64))) phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1) #s(literal 0 binary64)))
(* 1/2 (- (cos (neg phi1)) (cos phi1)))
#s(literal 0 binary64)
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (* 1/2 (- (cos (neg phi1)) (cos phi1))))
(fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) #s(literal 0 binary64))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (* 1/2 (- (sin phi1) (sin (neg phi1)))))))
(fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 0 binary64) phi2 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1))) #s(literal 0 binary64))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))))
(fma.f64 (fma.f64 (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi1))) phi2) #s(literal 1/2 binary64) #s(literal 0 binary64)) phi2)) phi2 #s(literal 0 binary64))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 phi1)) phi2)
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64))) (*.f64 phi2 phi2) (sin.f64 phi1)) phi2)
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2) #s(literal 1/120 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi1))) (*.f64 phi2 phi2) (sin.f64 phi1)) phi2)
(- (cos (neg phi1)) (cos phi1))
#s(literal 0 binary64)
(- (+ (cos (neg phi1)) (* phi2 (- (sin phi1) (sin (neg phi1))))) (cos phi1))
(fma.f64 (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) phi2 #s(literal 0 binary64))
(- (+ (cos (neg phi1)) (* phi2 (- (+ (sin phi1) (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (sin (neg phi1))))) (cos phi1))
(fma.f64 (-.f64 (fma.f64 #s(literal 0 binary64) phi2 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1))) phi2 #s(literal 0 binary64))
(- (+ (cos (neg phi1)) (* phi2 (- (+ (sin phi1) (* phi2 (- (+ (* -1/2 (cos (neg phi1))) (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* -1/2 (cos phi1))))) (sin (neg phi1))))) (cos phi1))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi1))) phi2 #s(literal 0 binary64)) phi2 (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)))) phi2 #s(literal 0 binary64))
(cos (neg phi1))
(cos.f64 phi1)
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(fma.f64 (neg.f64 phi2) (neg.f64 (sin.f64 phi1)) (cos.f64 phi1))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) phi2) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 phi1))) phi2 (cos.f64 phi1))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi2) (neg.f64 (sin.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) phi2) (neg.f64 (sin.f64 phi1))) phi2 (cos.f64 phi1))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(fma.f64 (neg.f64 phi2) (sin.f64 phi1) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) phi2) #s(literal -1/2 binary64)) (sin.f64 phi1)) phi2 (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) phi2) (sin.f64 phi1)) phi2 (cos.f64 phi1))
(+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))

rewrite402.0ms (2.1%)

Memory
-12.6MiB live, 373.7MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
089692
0135614
1548522
24587522
08407516
Stop Event
iter limit
node limit
iter limit
Counts
27 → 409
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
(+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #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 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1)))
#s(approx (cos (- phi2 phi1)) (cos.f64 phi2))
(cos.f64 (+.f64 phi2 phi1))
(pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))
Outputs
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(/.f64 (-.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(-.f64 (/.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)) (-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))))
(-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))
(-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(+.f64 (/.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(-.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))))
(-.f64 (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))))
(-.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))
(-.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(+.f64 (/.f64 (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (pow.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) R)
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) #s(approx (cos (- phi2 phi1)) (cos.f64 phi2))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) #s(approx (cos (- phi2 phi1)) (cos.f64 phi2))) (pow.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(neg.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64)))
(-.f64 (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(*.f64 (/.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))) (cos.f64 phi1)) (-.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)))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.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))) (cos.f64 phi1)) (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(*.f64 (/.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(*.f64 (-.f64 (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 (neg.f64 (cos.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 phi1 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 phi1 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda2 lambda1)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 4 binary64))) (/.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 6 binary64))) (/.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2)))
(/.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))) (cos.f64 phi1)) (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 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (cos.f64 phi1) (+.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 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (-.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 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 4 binary64))) (cos.f64 phi1)) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 6 binary64))) (cos.f64 phi1)) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (-.f64 lambda2 lambda1)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1))) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1))) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.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) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.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 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.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 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (neg.f64 phi1) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (neg.f64 phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 phi1 (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 phi1 (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) phi1)) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) phi1)) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi1))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (neg.f64 phi1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (-.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)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #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))) (cos.f64 phi1)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(neg.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (-.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 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(neg.f64 (/.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))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(+.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) #s(literal 2 binary64)))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(/.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (fma.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(neg.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 1 binary64)))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 1 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 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 (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)))) (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 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.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 (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)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 4 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 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 (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 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (pow.f64 (sin.f64 lambda2) #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (pow.f64 (sin.f64 lambda2) #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (pow.f64 (sin.f64 lambda2) #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.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 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 (/.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 (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 (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 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) #s(approx (cos (- phi2 phi1)) (cos.f64 phi2))) (pow.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) #s(approx (cos (- phi2 phi1)) (cos.f64 phi2))))
(/.f64 (-.f64 (pow.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) #s(approx (cos (- phi2 phi1)) (cos.f64 phi2))) (pow.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) #s(approx (cos (- phi2 phi1)) (cos.f64 phi2))) (pow.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) #s(approx (cos (- phi2 phi1)) (cos.f64 phi2))) (pow.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1)))
(+.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
#s(approx (cos (- phi2 phi1)) (cos.f64 phi2))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi1 phi2)))
(fma.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(sin.f64 (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 phi2 phi1))))
(cos.f64 (neg.f64 (+.f64 phi2 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(+.f64 (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 lambda2)) (cos.f64 lambda1))
(*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 lambda1)) (cos.f64 lambda2))
(*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))) (cos.f64 lambda2))
(*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1)))
(*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (neg.f64 (cos.f64 lambda1))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(*.f64 (fabs.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fabs.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (fabs.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (fabs.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(*.f64 (exp.f64 (log.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (exp.f64 (log.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (neg.f64 (cos.f64 lambda1))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(pow.f64 (exp.f64 (log.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))
(pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 4 binary64))
(neg.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))))

eval174.0ms (0.9%)

Memory
2.4MiB live, 189.5MiB allocated
Compiler

Compiled 34 959 to 4 071 computations (88.4% saved)

prune140.0ms (0.7%)

Memory
32.5MiB live, 177.5MiB allocated
Pruning

87 alts after pruning (85 fresh and 2 done)

PrunedKeptTotal
New66442706
Fresh224365
Picked415
Done011
Total69087777
Accuracy
94.0%
Counts
777 → 87
Alt Table
Click to see full alt table
StatusAccuracyProgram
70.3%
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) R)
56.2%
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))))) R)
56.2%
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))) R)
15.7%
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
70.4%
(*.f64 (-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))) R)
70.4%
(*.f64 (-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
70.6%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
40.0%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))) R)
56.3%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
40.9%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
15.7%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
70.4%
(*.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))) R)
75.0%
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
70.7%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
56.4%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
40.0%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) R)
52.0%
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
70.6%
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))) R)
70.6%
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))) R)
56.3%
(*.f64 (acos.f64 (/.f64 (+.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64))))) R)
40.0%
(*.f64 (acos.f64 (-.f64 (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))))) R)
25.9%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (sin.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
56.4%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (fma.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
40.0%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (fma.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
25.2%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
31.1%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
40.3%
(*.f64 (acos.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
93.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))) R)
51.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 2 binary64)))) R)
56.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
34.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64)))))) R)
93.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
38.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
38.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)
75.0%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
75.0%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
74.9%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))))))) R)
31.8%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
31.9%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
35.7%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
34.7%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
42.1%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
42.8%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
25.9%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
40.9%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi2) phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
70.5%
(*.f64 (acos.f64 (*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) R)
33.1%
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
34.6%
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
40.2%
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
42.9%
(*.f64 (acos.f64 #s(approx (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)
41.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
93.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
51.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
53.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
52.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
53.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
33.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
31.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
53.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1))))) R)
19.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.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)))) R)
18.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
18.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
19.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
19.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
28.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))) R)
53.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))) R)
40.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))))) R)
23.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
23.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
23.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
23.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
29.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
30.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
15.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
21.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
21.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
21.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1)))))))))) R)
21.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 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 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))))) R)
8.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
8.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
7.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))) R)
6.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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))))))) R)
7.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) R)
6.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))) R)
9.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) R)
10.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) R)
23.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
Compiler

Compiled 8 011 to 4 939 computations (38.3% saved)

simplify146.0ms (0.7%)

Memory
-32.1MiB live, 116.2MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
cost-diff0
(acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))
cost-diff0
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
cost-diff6
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
cost-diff0
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
cost-diff0
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
cost-diff0
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))))
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
cost-diff0
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
cost-diff0
(acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
cost-diff0
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
cost-diff1
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
cost-diff0
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
cost-diff0
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
cost-diff0
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
cost-diff0
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))))
cost-diff0
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))) R)
cost-diff1
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))
cost-diff6
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
078762
0119735
1246720
2541720
31478720
42992720
54922720
08300705
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi2)
(cos.f64 phi1)
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1))
(sin.f64 lambda1)
(sin.f64 lambda2)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
R
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(cos.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)
(cos.f64 phi2)
phi2
R
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
(acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
#s(literal 0 binary64)
R
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))) R)
(*.f64 R (acos.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))))
(acos.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi2)
(cos.f64 phi1)
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))
(sin.f64 lambda1)
(sin.f64 lambda2)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
R
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(acos.f64 (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
(*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
(*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(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)))
(cos.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)
(cos.f64 phi2)
phi2
R
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
(*.f64 (acos.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))
(acos.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(cos.f64 lambda1)
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
#s(literal 0 binary64)
R

localize572.0ms (2.9%)

Memory
37.3MiB live, 646.7MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.26171875
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
accuracy0.2734375
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
accuracy3.8222422152005495
(acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))
accuracy53.457320074109816
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
accuracy0.1953125
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
accuracy0.26171875
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
accuracy3.8222422152005495
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))))
accuracy29.159005527251768
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
accuracy0.26171875
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
accuracy3.8222422152005495
(acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
accuracy30.330067776495845
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
accuracy53.457320074109816
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
accuracy3.8222422152005495
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
accuracy16.835371506797607
(cos.f64 (-.f64 lambda2 lambda1))
accuracy28.172760250518753
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
accuracy28.838663753980626
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
accuracy0.2265625
(*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))
accuracy0.23392254109026736
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
accuracy0.26171875
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))) R)
accuracy3.8222422152005495
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))))
Samples
496.0ms253×1valid
5.0ms2valid
Compiler

Compiled 658 to 64 computations (90.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 440.0ms
ival-cos: 166.0ms (37.7% of total)
ival-mult: 94.0ms (21.4% of total)
ival-sin: 62.0ms (14.1% of total)
ival-acos: 42.0ms (9.5% of total)
adjust: 40.0ms (9.1% of total)
ival-add: 23.0ms (5.2% of total)
ival-sub: 9.0ms (2% of total)
ival-div: 3.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series118.0ms (0.6%)

Memory
-41.9MiB live, 155.0MiB allocated
Counts
24 → 214
Calls
Call 1
Inputs
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
(acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
(*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
Outputs
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos lambda2) (cos phi1))
(+ (* lambda1 (* (cos phi1) (sin lambda2))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos lambda2) (cos phi2))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
(* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos phi1) (* (cos phi2) (sin lambda2)))))
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (pow lambda1 2) (* (cos phi1) (* (cos phi2) (sin lambda2)))))))))
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* 1/120 (* (cos phi1) (* (cos phi2) (sin lambda2))))))))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* lambda1 (sin lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda1 lambda2))
(* (sin lambda1) (sin lambda2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (neg lambda1)))
(+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi1) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi1) (sin (neg lambda1))))))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(* (cos lambda1) (cos phi2))
(+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))
(* lambda2 (* (cos phi1) (cos phi2)))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2))))
(* lambda2 (+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi1) (cos phi2))) (* 1/120 (* (pow lambda2 2) (* (cos phi1) (cos phi2))))))))
(* lambda2 (+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/120 (* (cos phi1) (cos phi2)))))))))
(* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos phi1) (* (cos phi2) (sin lambda1)))))
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/120 (* (pow lambda2 2) (* (cos phi1) (* (cos phi2) (sin lambda1)))))))))
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/120 (* (cos phi1) (* (cos phi2) (sin lambda1))))))))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(cos 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)))))
(* lambda2 (sin lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(* (cos phi1) (* (cos phi2) (sin lambda2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (+ lambda1 (* -1 lambda2)))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/24 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/720 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi1 2) (cos (- lambda2 lambda1)))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi1 2) (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(+ (* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2)))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (* phi1 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2)))))
(* phi1 (+ (* 1/2 (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2))))))
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* 1/2 (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))))))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/2 (* phi1 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (sin lambda2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2)))
(+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (sin lambda2))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))))))
(+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (sin lambda2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* 1/24 (* (cos phi2) (sin lambda2))))))))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))
(* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2))))
(+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* R (acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))
(+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(* R (acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2))))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* 1/24 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/720 (* (cos phi1) (* (sin lambda1) (sin lambda2))))))))))))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(* 1/2 (- (cos (neg phi1)) (cos phi1)))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (* 1/2 (- (cos (neg phi1)) (cos phi1))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (* 1/2 (- (sin phi1) (sin (neg phi1)))))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))
(* (cos phi1) (sin lambda2))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (sin lambda2)))) (* (cos phi1) (sin lambda2)))
(+ (* (cos phi1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (sin lambda2))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (sin lambda2)))))))
(+ (* (cos phi1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (sin lambda2)))) (* 1/24 (* (cos phi1) (sin lambda2))))))))
(* (cos phi1) (* (sin lambda1) (sin lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))))
(+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))))
(+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* R (acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))
(+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(* R (acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
Calls

15 calls:

TimeVariablePointExpression
27.0ms
phi2
@-inf
((+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2))) (* (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2)))) R) (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2)))) (* (* (cos phi1) (cos phi2)) (sin lambda2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (sin lambda2) (sin lambda1)))
13.0ms
phi1
@inf
((+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2))) (* (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2)))) R) (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2)))) (* (* (cos phi1) (cos phi2)) (sin lambda2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (sin lambda2) (sin lambda1)))
8.0ms
phi1
@-inf
((+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2))) (* (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2)))) R) (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2)))) (* (* (cos phi1) (cos phi2)) (sin lambda2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (sin lambda2) (sin lambda1)))
8.0ms
lambda2
@inf
((+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2))) (* (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2)))) R) (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2)))) (* (* (cos phi1) (cos phi2)) (sin lambda2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (sin lambda2) (sin lambda1)))
8.0ms
lambda2
@-inf
((+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda2 lambda1)) (cos phi1)) (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2))) (* (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2)))) R) (acos (+ (* (* (* (cos phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (+ (* (* (* (cos lambda2) (cos lambda1)) (cos phi1)) (cos phi2)) (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2)))) (* (* (cos phi1) (cos phi2)) (sin lambda2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (sin lambda2) (sin lambda1)))

simplify187.0ms (1%)

Memory
40.3MiB live, 220.2MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07595518
130115164
273895149
081884753
Stop Event
iter limit
node limit
Counts
214 → 214
Calls
Call 1
Inputs
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos lambda2) (cos phi1))
(+ (* lambda1 (* (cos phi1) (sin lambda2))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos lambda2) (cos phi2))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
(* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos phi1) (* (cos phi2) (sin lambda2)))))
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (pow lambda1 2) (* (cos phi1) (* (cos phi2) (sin lambda2)))))))))
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* 1/120 (* (cos phi1) (* (cos phi2) (sin lambda2))))))))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* lambda1 (sin lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda1 lambda2))
(* (sin lambda1) (sin lambda2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (neg lambda1)))
(+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi1) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi1) (sin (neg lambda1))))))))) (* (cos phi1) (cos (neg lambda1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(* (cos lambda1) (cos phi2))
(+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))
(* lambda2 (* (cos phi1) (cos phi2)))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2))))
(* lambda2 (+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi1) (cos phi2))) (* 1/120 (* (pow lambda2 2) (* (cos phi1) (cos phi2))))))))
(* lambda2 (+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/120 (* (cos phi1) (cos phi2)))))))))
(* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos phi1) (* (cos phi2) (sin lambda1)))))
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/120 (* (pow lambda2 2) (* (cos phi1) (* (cos phi2) (sin lambda1)))))))))
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/120 (* (cos phi1) (* (cos phi2) (sin lambda1))))))))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(cos 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)))))
(* lambda2 (sin lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(* (cos phi1) (* (cos phi2) (sin lambda2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (+ lambda1 (* -1 lambda2)))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/24 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/720 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi1 2) (cos (- lambda2 lambda1)))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi1 2) (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(+ (* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2)))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (* phi1 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2)))))
(* phi1 (+ (* 1/2 (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2))))))
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* 1/2 (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))))))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/2 (* phi1 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (sin lambda2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2)))
(+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (sin lambda2))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))))))
(+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (sin lambda2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* 1/24 (* (cos phi2) (sin lambda2))))))))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))
(* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2))))
(+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* R (acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))
(+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(* R (acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2))))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* 1/24 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/720 (* (cos phi1) (* (sin lambda1) (sin lambda2))))))))))))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(* 1/2 (- (cos (neg phi1)) (cos phi1)))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (* 1/2 (- (cos (neg phi1)) (cos phi1))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (* 1/2 (- (sin phi1) (sin (neg phi1)))))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))
(* (cos phi1) (sin lambda2))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (sin lambda2)))) (* (cos phi1) (sin lambda2)))
(+ (* (cos phi1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (sin lambda2))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (sin lambda2)))))))
(+ (* (cos phi1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (sin lambda2)))) (* 1/24 (* (cos phi1) (sin lambda2))))))))
(* (cos phi1) (* (sin lambda1) (sin lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))))
(+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))))
(+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* R (acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))
(+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(* R (acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
Outputs
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1))))) R)
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos lambda2) (cos phi1))
(*.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+ (* lambda1 (* (cos phi1) (sin lambda2))) (* (cos lambda2) (cos phi1)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi1))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos lambda2) (cos phi2))
(*.f64 (cos.f64 lambda2) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1)))))
(* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))
(*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos phi1) (* (cos phi2) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (pow lambda1 2) (* (cos phi1) (* (cos phi2) (sin lambda2)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* 1/120 (* (cos phi1) (* (cos phi2) (sin lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1))) (*.f64 lambda1 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 (sin.f64 lambda2) lambda1)
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (sin.f64 lambda2)) lambda1)
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (sin.f64 lambda2)) lambda1)
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda2))) (*.f64 lambda1 lambda1) (sin.f64 lambda2)) lambda1)
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1))))
(* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi1) (cos (neg lambda1)))
(*.f64 (cos.f64 lambda1) (cos.f64 phi1))
(+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (* (cos phi1) (cos (neg lambda1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (* (cos phi1) (cos (neg lambda1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi1) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi1) (sin (neg lambda1))))))))) (* (cos phi1) (cos (neg lambda1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi1))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(* (cos lambda1) (cos phi2))
(*.f64 (cos.f64 lambda1) (cos.f64 phi2))
(+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(* lambda2 (* (cos phi1) (cos phi2)))
(*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) lambda2)
(* lambda2 (+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi1) (cos phi2))) (* 1/120 (* (pow lambda2 2) (* (cos phi1) (cos phi2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) lambda2)
(* lambda2 (+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/120 (* (cos phi1) (cos phi2)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2))) (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) lambda2)
(* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))
(*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos phi1) (* (cos phi2) (sin lambda1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2)
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/120 (* (pow lambda2 2) (* (cos phi1) (* (cos phi2) (sin lambda1)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2)
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/120 (* (cos phi1) (* (cos phi2) (sin lambda1))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2))) (*.f64 lambda2 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2)
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* lambda2 (sin lambda1))
(*.f64 (sin.f64 lambda1) lambda2)
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1)) lambda2)
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1)) lambda2)
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda1))) (*.f64 lambda2 lambda2) (sin.f64 lambda1)) lambda2)
(* (cos phi1) (* (cos phi2) (sin lambda2)))
(*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/24 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/720 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (*.f64 phi1 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) phi1 (sin.f64 phi2)) phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi1 (sin.f64 phi2)) phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))) phi1 (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi1 2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi1 2) (cos (- lambda2 lambda1)))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(+ (* phi1 (+ (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2)))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal -2 binary64) (sin.f64 phi2)))) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (* phi1 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64)) phi1))) phi1 (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64))) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2)))))
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) phi1) #s(literal 1/2 binary64))
(* phi1 (+ (* 1/2 (* (pow phi1 2) (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* 1/2 (- (sin phi2) (* -1 (sin phi2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64)) (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (sin.f64 phi2)))) phi1)
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))) (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))))
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (sin.f64 phi2) #s(literal 1/60 binary64)) (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64)))) (*.f64 phi1 phi1) (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64))) phi1)
(* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (* (pow phi1 2) (+ (* 1/2 (* (pow phi1 2) (- (* -1/5040 (sin phi2)) (* 1/5040 (sin phi2))))) (* 1/2 (- (* 1/120 (sin phi2)) (* -1/120 (sin phi2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (sin.f64 phi2) #s(literal -1/2520 binary64)) (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) #s(literal 1/60 binary64)))) (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64)) #s(literal 1/2 binary64))) (*.f64 phi1 phi1) (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64))) phi1)
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (sin.f64 phi2)) phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi1 (sin.f64 phi2)) phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(+ (* 1/2 (* phi1 (- (sin phi2) (* -1 (sin phi2))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) phi1 (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64))) phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(+ (* phi1 (+ (* 1/2 (- (sin phi2) (* -1 (sin phi2)))) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/2 (* phi1 (- (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi2) #s(literal -1/3 binary64)) phi1) #s(literal 1/2 binary64))) phi1 (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64))) phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(* (cos phi2) (sin lambda2))
(*.f64 (sin.f64 lambda2) (cos.f64 phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))
(+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (sin lambda2))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))
(+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (sin lambda2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* 1/24 (* (cos phi2) (sin lambda2))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(* 1/2 (- (cos (- phi2 phi1)) (cos (+ phi1 phi2))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))
(+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))
(+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1))))
(* R (acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1))))) R)
(acos (+ (* 1/2 (- (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1)))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2))))))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* 1/24 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/720 (* (cos phi1) (* (sin lambda1) (sin lambda2))))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) (*.f64 phi2 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) phi2 (sin.f64 phi1)) phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi2 (sin.f64 phi1)) phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))) phi2 (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1) #s(literal 0 binary64))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1) #s(literal 0 binary64)))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64)) phi2 (*.f64 (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) #s(literal 1/2 binary64))) phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1) #s(literal 0 binary64)))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi1))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64))) phi2 (*.f64 (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) #s(literal 1/2 binary64))) phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1) #s(literal 0 binary64)))
(* 1/2 (- (cos (neg phi1)) (cos phi1)))
#s(literal 0 binary64)
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (* 1/2 (- (cos (neg phi1)) (cos phi1))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) #s(literal 0 binary64))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))) (* 1/2 (- (sin phi1) (sin (neg phi1)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 0 binary64) phi2 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))) phi2 #s(literal 0 binary64))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))))
(fma.f64 (fma.f64 (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi1))) phi2) #s(literal 1/2 binary64) #s(literal 0 binary64)) phi2)) phi2 #s(literal 0 binary64))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (sin.f64 phi1)) phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi2 (sin.f64 phi1)) phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.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 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) #s(literal 0 binary64))
(+ (* 1/2 (* phi2 (- (sin phi1) (sin (neg phi1))))) (+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) #s(literal 0 binary64)))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1))))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 0 binary64)) phi2 (*.f64 (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) #s(literal 1/2 binary64))) phi2 (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) #s(literal 0 binary64)))
(+ (* 1/2 (- (cos (neg phi1)) (cos phi1))) (+ (* phi2 (+ (* 1/2 (- (sin phi1) (sin (neg phi1)))) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (+ (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* 1/2 (- (* -1/2 (cos (neg phi1))) (* -1/2 (cos phi1)))))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi1))) phi2) #s(literal 1/2 binary64) #s(literal 0 binary64))) phi2 (*.f64 (-.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) #s(literal 1/2 binary64))) phi2 (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) #s(literal 0 binary64)))
(* (cos phi1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (cos.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (sin lambda2)))) (* (cos phi1) (sin lambda2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (cos.f64 phi1)))
(+ (* (cos phi1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (sin lambda2))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (sin lambda2)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 lambda2) (cos.f64 phi1)))
(+ (* (cos phi1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (sin lambda2)))) (* 1/24 (* (cos phi1) (sin lambda2))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (sin.f64 lambda2))) (*.f64 phi2 phi2) (*.f64 (sin.f64 lambda2) (cos.f64 phi1)))
(* (cos phi1) (* (sin lambda1) (sin lambda2)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (sin.f64 lambda2))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (sin.f64 lambda2)))
(+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (* (sin lambda1) (sin lambda2))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (sin.f64 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (sin.f64 lambda2)))
(+ (* (cos phi1) (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (sin.f64 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi2 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (sin.f64 lambda2)))
(+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))
(+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1))))
(* R (acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1))))) R)
(acos (+ (* 1/2 (- (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))
(acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1)))))

rewrite216.0ms (1.1%)

Memory
-9.6MiB live, 225.3MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
078583
0119448
1471415
24263415
08028400
Stop Event
iter limit
node limit
iter limit
Counts
24 → 439
Calls
Call 1
Inputs
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
(acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
(*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
Outputs
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.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 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.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 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.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 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (*.f64 (cos.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 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.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 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.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 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.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 lambda1)) (cos.f64 lambda2)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.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 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #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 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.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 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (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 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 lambda1)))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1))) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))) (sin.f64 lambda1)))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 lambda2)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2)))))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi1) phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi1) phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(-.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))) (sin.f64 lambda1)))
(-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))))
(-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(/.f64 (-.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64))))
(fma.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(-.f64 (/.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)) (-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (neg.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))
(-.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(+.f64 (/.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(*.f64 (acos.f64 (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(*.f64 R (acos.f64 (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (asin.f64 (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (asin.f64 (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))
(acos.f64 (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
#s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) phi2)) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) phi2)) (cos.f64 (-.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda2 lambda1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (neg.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 phi2 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 phi2 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (cos.f64 (+.f64 lambda1 lambda2)))
(/.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))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.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))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.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))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (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 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (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 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (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 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.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 lambda2 lambda1)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.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 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 (-.f64 lambda1 (/.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 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.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)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) phi2)) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda2 lambda1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) phi2)) (cos.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 phi2 (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 phi2 (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 lambda1) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2)) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) (/.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))))
(-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))) (sin.f64 lambda1)))
(-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (*.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (*.f64 (neg.f64 (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))))
(-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(+.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))
(*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (sin.f64 lambda2)) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 lambda2) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))
(*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (sin.f64 lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.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 lambda2)) (sin.f64 lambda1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)) #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 lambda2)) (cos.f64 lambda1))))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (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 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 lambda1)) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.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 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 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 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 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 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 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(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 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (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 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (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 lambda1)) (cos.f64 lambda2)))) (/.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 lambda1)) (cos.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (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)))
(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 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (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 lambda1 lambda2)) (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 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))

eval110.0ms (0.6%)

Memory
2.2MiB live, 186.6MiB allocated
Compiler

Compiled 29 551 to 3 386 computations (88.5% saved)

prune266.0ms (1.4%)

Memory
-0.6MiB live, 470.9MiB allocated
Pruning

95 alts after pruning (91 fresh and 4 done)

PrunedKeptTotal
New59235627
Fresh245680
Picked325
Done022
Total61995714
Accuracy
94.0%
Counts
714 → 95
Alt Table
Click to see full alt table
StatusAccuracyProgram
70.3%
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) R)
40.0%
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))) R)
40.1%
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) R)
15.7%
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
23.7%
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
70.4%
(*.f64 (-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))) R)
70.4%
(*.f64 (-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
70.6%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
40.0%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))) R)
40.1%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
40.9%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
15.7%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
23.8%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
70.4%
(*.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))) R)
70.7%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
40.0%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) R)
42.1%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
69.0%
(*.f64 (acos.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (sin lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 phi1))) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
52.0%
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
70.6%
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))) R)
70.6%
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))) R)
56.3%
(*.f64 (acos.f64 (/.f64 (+.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64))))) R)
40.0%
(*.f64 (acos.f64 (-.f64 (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))))) R)
25.9%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (sin.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
56.4%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (fma.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
40.0%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (fma.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
25.2%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
31.1%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
40.3%
(*.f64 (acos.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
51.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 2 binary64)))) R)
56.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
34.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64)))))) R)
93.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
38.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
38.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)
51.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))) R)
52.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))))) R)
75.0%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
75.0%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
31.8%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
31.9%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
42.8%
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
25.9%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
40.9%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi2) phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
70.5%
(*.f64 (acos.f64 (*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) R)
33.1%
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
34.6%
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
42.9%
(*.f64 (acos.f64 #s(approx (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)
53.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
41.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
93.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
51.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
52.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))))) R)
20.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) R)
19.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64)))) R)
19.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64)))) R)
19.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
52.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) R)
52.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
53.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
28.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(approx (* (sin lambda2) (sin lambda1)) (*.f64 (sin.f64 lambda1) lambda2))) (cos.f64 phi2)))) R)
23.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))) R)
29.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
22.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
29.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
30.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
33.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
31.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
53.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1))))) R)
19.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
19.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
28.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))) R)
53.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))) R)
40.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))))) R)
23.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
23.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
23.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
23.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
29.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
30.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
23.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (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)))))))) R)
29.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
29.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (/.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 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))))) R)
21.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 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 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))))) R)
9.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) R)
16.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
16.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
23.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
10.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
9.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
10.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
9.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
10.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
15.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
16.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
Compiler

Compiled 12 422 to 3 837 computations (69.1% saved)

regimes451.0ms (2.3%)

Memory
22.4MiB live, 832.8MiB allocated
Counts
167 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(approx (* (sin lambda2) (sin lambda1)) (*.f64 (sin.f64 lambda1) lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi2) phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (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)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (sin.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (sin lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 phi1))) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi2) phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (fma.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (fma.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(approx (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64)))))) R)
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))) (pow.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) #s(literal 2 binary64))))) R)
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (/.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 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (-.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 lambda1)) (cos.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1))) #s(literal 2 binary64))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))))) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1)))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #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 lambda1)) (cos.f64 lambda2))))) (cos.f64 phi1)))) R)
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))) R)
(*.f64 (acos.f64 (/.f64 (-.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))) R)
(*.f64 (-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 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 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))))) R)
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) R)
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) R)
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) R)
(*.f64 (-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))) R)
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))) R)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
Calls

10 calls:

71.0ms
R
43.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
42.0ms
lambda2
42.0ms
(cos.f64 (-.f64 lambda1 lambda2))
42.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
Results
AccuracySegmentsBranch
93.7%1(-.f64 lambda1 lambda2)
93.7%1(cos.f64 (-.f64 lambda1 lambda2))
93.7%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
93.7%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
93.7%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
93.7%1R
93.7%1lambda1
93.7%1lambda2
93.7%1phi1
93.7%1phi2
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes367.0ms (1.9%)

Memory
30.5MiB live, 689.9MiB allocated
Counts
124 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(approx (* (sin lambda2) (sin lambda1)) (*.f64 (sin.f64 lambda1) lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi2) phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (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)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (sin.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 phi2 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 (+.f64 phi2 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (sin lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 phi1))) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi2) phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Calls

10 calls:

74.0ms
R
36.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
35.0ms
(-.f64 lambda1 lambda2)
33.0ms
lambda2
31.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
Results
AccuracySegmentsBranch
93.7%1(-.f64 lambda1 lambda2)
93.7%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
93.7%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
93.7%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
93.7%1R
93.7%1(cos.f64 (-.f64 lambda1 lambda2))
93.7%1lambda1
93.7%1phi1
93.7%1lambda2
93.7%1phi2
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes368.0ms (1.9%)

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

10 calls:

51.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
41.0ms
R
41.0ms
phi2
37.0ms
lambda1
33.0ms
lambda2
Results
AccuracySegmentsBranch
75.0%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
75.0%1R
83.8%3(-.f64 lambda1 lambda2)
75.0%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
75.0%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
83.6%3phi1
81.4%2(cos.f64 (-.f64 lambda1 lambda2))
84.7%3lambda1
85.4%3lambda2
83.8%3phi2
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes38.0ms (0.2%)

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

1 calls:

29.0ms
lambda2
Results
AccuracySegmentsBranch
85.3%3lambda2
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes163.0ms (0.8%)

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

5 calls:

35.0ms
lambda1
34.0ms
lambda2
32.0ms
(-.f64 lambda1 lambda2)
28.0ms
phi1
28.0ms
phi2
Results
AccuracySegmentsBranch
82.3%3phi1
83.0%3phi2
74.8%3(-.f64 lambda1 lambda2)
76.5%3lambda1
77.3%3lambda2
Compiler

Compiled 7 to 26 computations (-271.4% saved)

regimes31.0ms (0.2%)

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

1 calls:

26.0ms
phi2
Results
AccuracySegmentsBranch
83.0%3phi2
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes29.0ms (0.2%)

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

1 calls:

25.0ms
phi2
Results
AccuracySegmentsBranch
83.0%3phi2
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes164.0ms (0.8%)

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

7 calls:

24.0ms
phi1
24.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
23.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
22.0ms
phi2
22.0ms
(cos.f64 (-.f64 lambda1 lambda2))
Results
AccuracySegmentsBranch
58.4%2(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
60.8%2(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
60.8%2(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
58.4%2R
79.3%4phi1
69.1%3(cos.f64 (-.f64 lambda1 lambda2))
77.6%3phi2
Compiler

Compiled 59 to 70 computations (-18.6% saved)

regimes89.0ms (0.5%)

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

4 calls:

23.0ms
lambda2
21.0ms
phi2
19.0ms
lambda1
19.0ms
phi1
Results
AccuracySegmentsBranch
76.2%4lambda1
75.3%3lambda2
75.5%3phi2
67.9%4phi1
Compiler

Compiled 4 to 20 computations (-400% saved)

regimes85.0ms (0.4%)

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

4 calls:

21.0ms
lambda2
21.0ms
lambda1
20.0ms
phi2
19.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
74.2%3lambda1
66.5%3(-.f64 lambda1 lambda2)
65.2%3lambda2
74.3%3phi2
Compiler

Compiled 6 to 21 computations (-250% saved)

regimes43.0ms (0.2%)

Memory
-6.3MiB live, 87.1MiB allocated
Counts
78 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(approx (* (sin lambda2) (sin lambda1)) (*.f64 (sin.f64 lambda1) lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi2) phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (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)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
Calls

2 calls:

20.0ms
lambda1
18.0ms
phi2
Results
AccuracySegmentsBranch
65.2%3lambda1
68.6%2phi2
Compiler

Compiled 2 to 10 computations (-400% saved)

regimes240.0ms (1.2%)

Memory
14.0MiB live, 391.4MiB allocated
Counts
77 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(approx (* (sin lambda2) (sin lambda1)) (*.f64 (sin.f64 lambda1) lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi2) phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (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)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
Outputs
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
Calls

10 calls:

36.0ms
lambda2
35.0ms
(cos.f64 (-.f64 lambda1 lambda2))
30.0ms
(-.f64 lambda1 lambda2)
21.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
20.0ms
phi2
Results
AccuracySegmentsBranch
56.4%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
56.4%1R
56.4%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
56.4%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
56.4%1lambda2
56.4%1lambda1
56.4%1phi1
56.4%1(-.f64 lambda1 lambda2)
56.4%1(cos.f64 (-.f64 lambda1 lambda2))
56.4%1phi2
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes120.0ms (0.6%)

Memory
3.0MiB live, 193.9MiB allocated
Counts
46 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 #s(approx (/ (- (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2) (pow (* (sin phi2) (sin phi1)) 2)) (- (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) R)
Calls

10 calls:

13.0ms
lambda2
13.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
12.0ms
(cos.f64 (-.f64 lambda1 lambda2))
12.0ms
phi1
11.0ms
lambda1
Results
AccuracySegmentsBranch
42.8%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
42.8%1R
48.5%2(cos.f64 (-.f64 lambda1 lambda2))
50.1%3(-.f64 lambda1 lambda2)
46.8%2(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
56.1%2phi2
56.4%3lambda1
56.3%3lambda2
46.8%2(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
56.1%2phi1
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes25.0ms (0.1%)

Memory
-10.6MiB live, 34.8MiB allocated
Counts
19 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
Calls

4 calls:

8.0ms
phi1
5.0ms
phi2
5.0ms
lambda1
5.0ms
lambda2
Results
AccuracySegmentsBranch
45.4%3lambda2
45.3%3lambda1
52.4%2phi2
49.6%2phi1
Compiler

Compiled 4 to 20 computations (-400% saved)

regimes34.0ms (0.2%)

Memory
6.8MiB live, 55.8MiB allocated
Counts
18 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
Calls

6 calls:

7.0ms
phi1
5.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
5.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
5.0ms
phi2
5.0ms
(cos.f64 (-.f64 lambda1 lambda2))
Results
AccuracySegmentsBranch
39.0%4(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
39.0%4(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
37.3%3(-.f64 lambda1 lambda2)
33.0%2(cos.f64 (-.f64 lambda1 lambda2))
45.9%3phi1
42.7%2phi2
Compiler

Compiled 42 to 54 computations (-28.6% saved)

regimes27.0ms (0.1%)

Memory
-1.9MiB live, 43.1MiB allocated
Counts
15 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
Calls

5 calls:

9.0ms
phi1
4.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
4.0ms
lambda2
4.0ms
lambda1
4.0ms
R
Results
AccuracySegmentsBranch
40.9%3lambda1
44.0%4lambda2
34.4%3R
34.4%3(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
43.2%2phi1
Compiler

Compiled 23 to 37 computations (-60.9% saved)

regimes21.0ms (0.1%)

Memory
-15.2MiB live, 30.2MiB allocated
Counts
14 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
Calls

4 calls:

8.0ms
phi2
4.0ms
lambda1
4.0ms
phi1
4.0ms
lambda2
Results
AccuracySegmentsBranch
40.9%3lambda1
40.9%3lambda2
30.4%1phi2
35.7%2phi1
Compiler

Compiled 4 to 20 computations (-400% saved)

regimes27.0ms (0.1%)

Memory
-7.9MiB live, 38.1MiB allocated
Counts
13 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
Calls

6 calls:

6.0ms
phi1
4.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
4.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
4.0ms
lambda1
4.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
35.7%2phi1
30.4%1(-.f64 lambda1 lambda2)
30.4%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
30.4%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
35.7%3lambda2
30.4%1lambda1
Compiler

Compiled 39 to 52 computations (-33.3% saved)

regimes82.0ms (0.4%)

Memory
-15.2MiB live, 59.5MiB allocated
Counts
12 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
Calls

10 calls:

49.0ms
phi2
4.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
4.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
4.0ms
phi1
4.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Results
AccuracySegmentsBranch
23.8%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
23.8%1(-.f64 lambda1 lambda2)
23.8%1phi2
23.8%1lambda1
23.8%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
23.8%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
23.8%1R
23.8%1(cos.f64 (-.f64 lambda1 lambda2))
23.8%1lambda2
23.8%1phi1
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes17.0ms (0.1%)

Memory
-13.6MiB live, 32.9MiB allocated
Counts
2 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
Calls

10 calls:

5.0ms
phi1
1.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
1.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
1.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
1.0ms
lambda1
Results
AccuracySegmentsBranch
18.3%2phi1
16.4%1phi2
16.4%1(cos.f64 (-.f64 lambda1 lambda2))
23.8%3lambda2
18.5%2(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
20.0%3(-.f64 lambda1 lambda2)
16.4%1R
23.7%3lambda1
18.5%2(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
16.4%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes8.0ms (0%)

Memory
19.2MiB live, 19.2MiB allocated
Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

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

7 calls:

1.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
1.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
1.0ms
lambda2
1.0ms
phi1
1.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
16.4%1phi2
16.4%1phi1
16.4%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
16.4%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
16.4%1(-.f64 lambda1 lambda2)
16.4%1lambda1
16.4%1lambda2
Compiler

Compiled 40 to 57 computations (-42.5% saved)

bsearch153.0ms (0.8%)

Memory
13.0MiB live, 154.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
94.0ms
3.059613820349742e-34
1.1999743612551203e-24
51.0ms
-4.4693147247938175e-12
-3.100538091436545e-15
Samples
97.0ms161×1valid
36.0ms111×0valid
Compiler

Compiled 889 to 790 computations (11.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 121.0ms
ival-sin: 55.0ms (45.5% of total)
ival-cos: 34.0ms (28.1% of total)
ival-mult: 11.0ms (9.1% of total)
ival-acos: 10.0ms (8.3% of total)
adjust: 6.0ms (5% of total)
ival-sub: 2.0ms (1.7% of total)
ival-add: 2.0ms (1.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory
7.9MiB live, 7.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.059613820349742e-34
1.1999743612551203e-24
1.0ms
-4.4693147247938175e-12
-3.100538091436545e-15
Compiler

Compiled 889 to 790 computations (11.1% saved)

bsearch152.0ms (0.8%)

Memory
-15.8MiB live, 119.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
62.0ms
5.96444255280098e-10
1.7596761503801619e-6
81.0ms
-0.0015400821651283265
-5.95476392977715e-45
Samples
111.0ms229×1valid
17.0ms91×0valid
Compiler

Compiled 1 090 to 953 computations (12.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 115.0ms
ival-sin: 33.0ms (28.8% of total)
ival-cos: 32.0ms (27.9% of total)
ival-mult: 14.0ms (12.2% of total)
ival-add: 13.0ms (11.3% of total)
ival-acos: 11.0ms (9.6% of total)
adjust: 9.0ms (7.8% of total)
ival-sub: 3.0ms (2.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory
4.5MiB live, 4.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
5.96444255280098e-10
1.7596761503801619e-6
2.0ms
-0.0015400821651283265
-5.95476392977715e-45
Compiler

Compiled 1 054 to 917 computations (13% saved)

bsearch3.0ms (0%)

Memory
4.1MiB live, 4.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
5.96444255280098e-10
1.7596761503801619e-6
2.0ms
-0.0015400821651283265
-5.95476392977715e-45
Compiler

Compiled 1 042 to 905 computations (13.1% saved)

bsearch244.0ms (1.2%)

Memory
-19.5MiB live, 168.0MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
75.0ms
1.0021565328874535e-7
1.7700024584425816e+35
64.0ms
-6.352893231244975e-8
-6.578311175301233e-12
77.0ms
-1.5484061050325396e+300
-1.73503447117965e+299
Samples
172.0ms275×1valid
25.0ms141×0valid
Compiler

Compiled 1 976 to 1 599 computations (19.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 179.0ms
ival-sin: 68.0ms (38% of total)
ival-cos: 64.0ms (35.8% of total)
ival-mult: 17.0ms (9.5% of total)
ival-acos: 13.0ms (7.3% of total)
adjust: 10.0ms (5.6% of total)
ival-sub: 3.0ms (1.7% of total)
ival-add: 3.0ms (1.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch93.0ms (0.5%)

Memory
11.8MiB live, 62.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
63.0ms
0.04176315048993784
0.23016769823041744
25.0ms
-0.0015400821651283265
-5.95476392977715e-45
Samples
71.0ms104×1valid
9.0ms56×0valid
Compiler

Compiled 1 210 to 997 computations (17.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 73.0ms
ival-sin: 38.0ms (52.2% of total)
ival-cos: 17.0ms (23.4% of total)
ival-mult: 6.0ms (8.2% of total)
ival-acos: 5.0ms (6.9% of total)
adjust: 4.0ms (5.5% of total)
ival-sub: 1.0ms (1.4% of total)
ival-add: 1.0ms (1.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch10.0ms (0.1%)

Memory
6.7MiB live, 6.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
0.04176315048993784
0.23016769823041744
8.0ms
-0.0015400821651283265
-5.95476392977715e-45
Samples
4.0ms10×1valid
1.0ms0valid
Compiler

Compiled 1 210 to 997 computations (17.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 5.0ms
ival-cos: 2.0ms (43.1% of total)
ival-mult: 1.0ms (21.5% of total)
ival-sin: 1.0ms (21.5% of total)
ival-sub: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-add: 0.0ms (0% of total)
ival-acos: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch45.0ms (0.2%)

Memory
25.5MiB live, 25.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
41.0ms
5.96444255280098e-10
1.7596761503801619e-6
Samples
29.0ms72×1valid
7.0ms40×0valid
Compiler

Compiled 494 to 425 computations (14% saved)

Precisions
Click to see histograms. Total time spent on operations: 31.0ms
ival-cos: 11.0ms (35.1% of total)
ival-sin: 8.0ms (25.5% of total)
ival-mult: 4.0ms (12.8% of total)
adjust: 3.0ms (9.6% of total)
ival-acos: 3.0ms (9.6% of total)
ival-sub: 1.0ms (3.2% of total)
ival-add: 1.0ms (3.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch113.0ms (0.6%)

Memory
-24.6MiB live, 63.6MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
109.0ms
-3.382528471788484e-13
-3.4079736697699446e-17
Samples
99.0ms106×1valid
4.0ms22×0valid
Compiler

Compiled 454 to 393 computations (13.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 97.0ms
ival-sub: 40.0ms (41.2% of total)
ival-acos: 23.0ms (23.7% of total)
ival-cos: 14.0ms (14.4% of total)
ival-sin: 9.0ms (9.3% of total)
ival-mult: 6.0ms (6.2% of total)
adjust: 4.0ms (4.1% of total)
ival-add: 1.0ms (1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch67.0ms (0.3%)

Memory
32.2MiB live, 75.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
63.0ms
0.23016769823041744
10803986.395126462
Samples
47.0ms86×1valid
10.0ms58×0valid
Compiler

Compiled 688 to 511 computations (25.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 51.0ms
ival-cos: 25.0ms (48.9% of total)
ival-sin: 11.0ms (21.5% of total)
ival-mult: 6.0ms (11.7% of total)
ival-acos: 4.0ms (7.8% of total)
adjust: 3.0ms (5.9% of total)
ival-sub: 1.0ms (2% of total)
ival-add: 1.0ms (2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch78.0ms (0.4%)

Memory
-8.9MiB live, 49.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
73.0ms
-8.219500741974994e-211
-3.894113693909416e-214
1.0ms
-6.352893231244975e-8
-6.578311175301233e-12
Samples
61.0ms89×1valid
6.0ms39×0valid
Compiler

Compiled 1 390 to 969 computations (30.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 61.0ms
ival-acos: 25.0ms (40.7% of total)
ival-cos: 21.0ms (34.2% of total)
ival-mult: 5.0ms (8.1% of total)
ival-sin: 5.0ms (8.1% of total)
adjust: 3.0ms (4.9% of total)
ival-sub: 1.0ms (1.6% of total)
ival-add: 1.0ms (1.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch81.0ms (0.4%)

Memory
-28.3MiB live, 103.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
74.0ms
-8.173080872525575e-23
-7.819231772013855e-30
Samples
54.0ms117×1valid
5.0ms27×0valid
Compiler

Compiled 715 to 529 computations (26% saved)

Precisions
Click to see histograms. Total time spent on operations: 52.0ms
ival-cos: 20.0ms (38.7% of total)
ival-mult: 10.0ms (19.4% of total)
ival-sin: 10.0ms (19.4% of total)
adjust: 4.0ms (7.7% of total)
ival-acos: 4.0ms (7.7% of total)
ival-sub: 1.0ms (1.9% of total)
ival-add: 1.0ms (1.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch127.0ms (0.6%)

Memory
37.8MiB live, 226.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
55.0ms
2.4926803731963228e-5
188.65421441494072
65.0ms
-0.00023322518238819061
-1.2070834419515587e-20
Samples
73.0ms143×1valid
29.0ms161×0valid
Compiler

Compiled 1 162 to 975 computations (16.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 88.0ms
ival-cos: 34.0ms (38.6% of total)
ival-sin: 25.0ms (28.4% of total)
ival-mult: 11.0ms (12.5% of total)
ival-acos: 8.0ms (9.1% of total)
adjust: 5.0ms (5.7% of total)
ival-sub: 2.0ms (2.3% of total)
ival-add: 2.0ms (2.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch32.0ms (0.2%)

Memory
-28.1MiB live, 68.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
30.0ms
-6.352893231244975e-8
-6.578311175301233e-12
Samples
24.0ms44×1valid
3.0ms20×0valid
Compiler

Compiled 518 to 425 computations (18% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
ival-cos: 7.0ms (36.2% of total)
ival-sin: 4.0ms (20.7% of total)
ival-mult: 3.0ms (15.5% of total)
adjust: 2.0ms (10.3% of total)
ival-acos: 2.0ms (10.3% of total)
ival-sub: 1.0ms (5.2% of total)
ival-assert: 0.0ms (0% of total)
ival-add: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch138.0ms (0.7%)

Memory
11.6MiB live, 200.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
85.0ms
10797607991478088000.0
2.379173586853681e+50
45.0ms
-1.1023593060040408e-6
-2.42676178724558e-10
Samples
98.0ms213×1valid
17.0ms91×0valid
Compiler

Compiled 1 352 to 975 computations (27.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 100.0ms
ival-cos: 44.0ms (44% of total)
ival-sin: 22.0ms (22% of total)
ival-mult: 12.0ms (12% of total)
ival-acos: 9.0ms (9% of total)
adjust: 8.0ms (8% of total)
ival-sub: 2.0ms (2% of total)
ival-add: 2.0ms (2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

simplify68.0ms (0.3%)

Memory
16.7MiB live, 62.9MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02191471
13161471
25131471
311351471
424901471
548791471
Stop Event
node limit
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(if (<=.f64 lambda2 #s(literal -693246421999813/618970019642690137449562112 binary64)) (*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R) (if (<=.f64 lambda2 #s(literal 1565298887836317/1361129467683753853853498429727072845824 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)))
(if (<=.f64 lambda2 #s(literal -693246421999813/618970019642690137449562112 binary64)) (*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (if (<=.f64 lambda2 #s(literal 1565298887836317/1361129467683753853853498429727072845824 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -2582544170319337/147573952589676412928 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi2 #s(literal 1239148965104995/302231454903657293676544 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)))
(if (<=.f64 phi2 #s(literal -2582544170319337/147573952589676412928 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi2 #s(literal 1239148965104995/302231454903657293676544 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)))
(if (<=.f64 phi2 #s(literal -2582544170319337/147573952589676412928 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (if (<=.f64 phi2 #s(literal 1239148965104995/302231454903657293676544 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)))
(if (<=.f64 phi1 #s(literal -900000000000000047254284229683978223834021722997343239424268703960622212190017376207734237572403077639333999449595490359248270911824387518080312966308036284563548480833918223364047210415309281053432057911473719950573007135070876792067187468502128245121332909938051158554304102524976748178913460486144 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal -146393360968959/2361183241434822606848 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 1890791267555229/9223372036854775808 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))))
(if (<=.f64 phi2 #s(literal -3984496719921263/147573952589676412928 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi2 #s(literal 6052837899185947/144115188075855872 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)))
(if (<=.f64 phi2 #s(literal -7526271582073497/295147905179352825856 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi2 #s(literal 6052837899185947/144115188075855872 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)))
(if (<=.f64 phi2 #s(literal 7177997053961861/4722366482869645213696 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(if (<=.f64 phi1 #s(literal -817040425928351/2475880078570760549798248448 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) R))
(if (<=.f64 phi2 #s(literal 2116691824864133/9007199254740992 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R))
(if (<=.f64 phi1 #s(literal -146393360968959/2361183241434822606848 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal -5211700138948913/11844773043065711480323635013294239465766037117894719018089691452225120183459296312949206610325977157215024800850914559983608856537741198665193842125253152001987113769690322155382272992184436377145866387891513586051123404341248 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)))
(if (<=.f64 phi1 #s(literal -2381976568446569/85070591730234615865843651857942052864 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R))
(if (<=.f64 lambda1 #s(literal -112986307451471/4611686018427387904 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R) (if (<=.f64 lambda1 #s(literal 7378697629483821/295147905179352825856 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)))
(if (<=.f64 phi1 #s(literal -4986819005910345/151115727451828646838272 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(if (<=.f64 lambda2 #s(literal -8825158483186793/604462909807314587353088 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R) (if (<=.f64 lambda2 #s(literal 11000000000000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(if (<=.f64 lambda2 #s(literal -693246421999813/618970019642690137449562112 binary64)) (*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R) (if (<=.f64 lambda2 #s(literal 1565298887836317/1361129467683753853853498429727072845824 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)))
(if (or (<=.f64 lambda2 #s(literal -693246421999813/618970019642690137449562112 binary64)) (not (<=.f64 lambda2 #s(literal 1565298887836317/1361129467683753853853498429727072845824 binary64)))) (*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R))
(if (<=.f64 lambda2 #s(literal -693246421999813/618970019642690137449562112 binary64)) (*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (if (<=.f64 lambda2 #s(literal 1565298887836317/1361129467683753853853498429727072845824 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)))
(if (or (<=.f64 lambda2 #s(literal -693246421999813/618970019642690137449562112 binary64)) (not (<=.f64 lambda2 #s(literal 1565298887836317/1361129467683753853853498429727072845824 binary64)))) (*.f64 (acos.f64 (+.f64 #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R))
(if (<=.f64 phi2 #s(literal -2582544170319337/147573952589676412928 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi2 #s(literal 1239148965104995/302231454903657293676544 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)))
(if (<=.f64 phi2 #s(literal -2582544170319337/147573952589676412928 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi2 #s(literal 1239148965104995/302231454903657293676544 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)))
(if (<=.f64 phi2 #s(literal -2582544170319337/147573952589676412928 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (if (<=.f64 phi2 #s(literal 1239148965104995/302231454903657293676544 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)))
(if (or (<=.f64 phi2 #s(literal -2582544170319337/147573952589676412928 binary64)) (not (<=.f64 phi2 #s(literal 1239148965104995/302231454903657293676544 binary64)))) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R))
(if (<=.f64 phi1 #s(literal -900000000000000047254284229683978223834021722997343239424268703960622212190017376207734237572403077639333999449595490359248270911824387518080312966308036284563548480833918223364047210415309281053432057911473719950573007135070876792067187468502128245121332909938051158554304102524976748178913460486144 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal -146393360968959/2361183241434822606848 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 1890791267555229/9223372036854775808 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))))
(if (<=.f64 phi2 #s(literal -3984496719921263/147573952589676412928 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi2 #s(literal 6052837899185947/144115188075855872 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)))
(if (<=.f64 phi2 #s(literal -7526271582073497/295147905179352825856 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi2 #s(literal 6052837899185947/144115188075855872 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)))
(if (or (<=.f64 phi2 #s(literal -7526271582073497/295147905179352825856 binary64)) (not (<=.f64 phi2 #s(literal 6052837899185947/144115188075855872 binary64)))) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R))
(if (<=.f64 phi2 #s(literal 7177997053961861/4722366482869645213696 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) #s(approx (/ (- (cos (- phi2 phi1)) (cos (+ phi2 phi1))) 2) #s(literal 0 binary64)))) R)
(if (<=.f64 phi1 #s(literal -817040425928351/2475880078570760549798248448 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) R))
(if (<=.f64 phi2 #s(literal 2116691824864133/9007199254740992 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R))
(if (<=.f64 phi1 #s(literal -146393360968959/2361183241434822606848 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal -5211700138948913/11844773043065711480323635013294239465766037117894719018089691452225120183459296312949206610325977157215024800850914559983608856537741198665193842125253152001987113769690322155382272992184436377145866387891513586051123404341248 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)))
(if (<=.f64 phi1 #s(literal -2381976568446569/85070591730234615865843651857942052864 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda2) (sin lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R))
(if (<=.f64 lambda1 #s(literal -112986307451471/4611686018427387904 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R) (if (<=.f64 lambda1 #s(literal 7378697629483821/295147905179352825856 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)))
(if (or (<=.f64 lambda1 #s(literal -112986307451471/4611686018427387904 binary64)) (not (<=.f64 lambda1 #s(literal 7378697629483821/295147905179352825856 binary64)))) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) R))
(if (<=.f64 phi1 #s(literal -4986819005910345/151115727451828646838272 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(if (<=.f64 lambda2 #s(literal -8825158483186793/604462909807314587353088 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R) (if (<=.f64 lambda2 #s(literal 11000000000000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)))
(if (or (<=.f64 lambda2 #s(literal -8825158483186793/604462909807314587353088 binary64)) (not (<=.f64 lambda2 #s(literal 11000000000000000000 binary64)))) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)

soundness2.1s (10.7%)

Memory
-148.4MiB live, 1 777.7MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
069543
0119432
1453432
23529432
08729417
09678791
134408368
083127983
06854097
125413824
085203559
0183819
1684801
22705754
36261754
08014691
07595518
130115164
273895149
081884753
089692
0135614
1548522
24587522
08407516
01761
02961
19661
275461
0816358
Stop Event
fuel
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
Compiler

Compiled 3 164 to 1 472 computations (53.5% saved)

preprocess246.0ms (1.3%)

Memory
8.7MiB live, 380.7MiB allocated
Remove

(sort phi1 phi2)

(negabs R)

Compiler

Compiled 3 080 to 570 computations (81.5% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...