Spherical law of cosines

Time bar (total: 20.2s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage

analyze1.2s (6.1%)

Memory
-122.0MiB live, 848.2MiB allocated; 1.0s collecting garbage
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)

sample4.8s (23.7%)

Memory
141.2MiB live, 5 926.1MiB allocated; 706ms collecting garbage
Samples
3.6s6 418×1valid
363.0ms1 693×0valid
69.0ms121×2valid
54.0ms24×3valid
Precisions
Click to see histograms. Total time spent on operations: 3.7s
ival-cos: 1.4s (38.2% of total)
ival-sin: 858.0ms (23.2% of total)
ival-mult: 450.0ms (12.2% of total)
adjust: 407.0ms (11% of total)
ival-acos: 345.0ms (9.3% of total)
ival-add: 120.0ms (3.3% of total)
ival-sub: 92.0ms (2.5% of total)
ival-true: 7.0ms (0.2% of total)
ival-assert: 4.0ms (0.1% of total)
Bogosity

explain429.0ms (2.1%)

Memory
-22.5MiB live, 761.0MiB allocated; 92ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
69119(2.1966189032256494e-276 -1.686028278215643e-58 -1.1248887320505262e+299 2.1220478547039967e+137 -9.471441994729496e+257)0-(cos.f64 (-.f64 lambda1 lambda2))
200-1(4.4358803797570627e+248 2.4155797284605445e+141 -1.3363865074497626e-51 1.0554041559791492e+51 2.0704199065554634e-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))sensitivity1881
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)))))sensitivity195
Confusion
Predicted +Predicted -
+891
-11749
Precision
0.4320388349514563
Recall
0.9888888888888889
Confusion?
Predicted +Predicted MaybePredicted -
+8910
-117148
Precision?
0.4326923076923077
Recall?
1.0
Freqs
test
numberfreq
050
1205
21
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
255.0ms400×1valid
48.0ms106×0valid
3.0ms3valid
2.0ms2valid
Compiler

Compiled 207 to 55 computations (73.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 271.0ms
ival-cos: 120.0ms (44.3% of total)
ival-sin: 73.0ms (27% of total)
ival-mult: 28.0ms (10.3% of total)
adjust: 24.0ms (8.9% of total)
ival-acos: 16.0ms (5.9% of total)
ival-sub: 5.0ms (1.8% of total)
ival-add: 4.0ms (1.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess144.0ms (0.7%)

Memory
-4.0MiB live, 233.4MiB allocated; 18ms collecting garbage
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; 0ms collecting garbage
Compiler

Compiled 0 to 5 computations (-∞% saved)

prune1.0ms (0%)

Memory
1.5MiB live, 1.6MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
72.8%
(*.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)

simplify105.0ms (0.5%)

Memory
-2.4MiB live, 188.6MiB allocated; 9ms collecting garbage
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

localize137.0ms (0.7%)

Memory
-8.2MiB live, 234.0MiB allocated; 9ms collecting garbage
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.20703125
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
accuracy0.23828125
(*.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)
accuracy4.251350824552931
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy14.830655218095725
(cos.f64 (-.f64 lambda1 lambda2))
Samples
109.0ms200×1valid
11.0ms53×0valid
1.0ms3valid
1.0ms2valid
Compiler

Compiled 94 to 19 computations (79.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 94.0ms
ival-cos: 36.0ms (38.4% of total)
ival-sin: 24.0ms (25.6% of total)
adjust: 11.0ms (11.7% of total)
ival-mult: 11.0ms (11.7% of total)
ival-acos: 8.0ms (8.5% of total)
ival-sub: 2.0ms (2.1% of total)
ival-add: 2.0ms (2.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series32.0ms (0.2%)

Memory
6.3MiB live, 52.5MiB allocated; 3ms collecting garbage
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
5.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)))
4.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)))
3.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
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)))

simplify166.0ms (0.8%)

Memory
27.1MiB live, 214.6MiB allocated; 15ms collecting garbage
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)

rewrite170.0ms (0.8%)

Memory
95.0MiB live, 300.3MiB allocated; 56ms collecting garbage
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)))

eval474.0ms (2.4%)

Memory
-173.0MiB live, 81.6MiB allocated; 862ms collecting garbage
Compiler

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

prune38.0ms (0.2%)

Memory
-14.8MiB live, 79.1MiB allocated; 4ms collecting garbage
Pruning

33 alts after pruning (33 fresh and 0 done)

PrunedKeptTotal
New13133164
Fresh000
Picked101
Done000
Total13233165
Accuracy
93.6%
Counts
165 → 33
Alt Table
Click to see full alt table
StatusAccuracyProgram
72.6%
(*.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)
72.7%
(*.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)
72.6%
(*.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)
72.8%
(*.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)
72.8%
(*.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)
72.8%
(*.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)
72.8%
(*.f64 (acos.f64 (-.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)))))) R)
93.3%
(*.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.3%
(*.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.3%
(*.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 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))))))) R)
93.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))))) R)
72.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) R)
93.2%
(*.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)
93.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.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)))))))))) R)
36.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)
36.3%
(*.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.4%
(*.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.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 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))))) R)
43.8%
(*.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.4%
(*.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.1%
(*.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)
41.3%
(*.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)
43.9%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
33.6%
(*.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)
29.1%
(*.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)
47.6%
(*.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)
54.8%
(*.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.4%
(*.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)
72.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) R)
31.3%
(*.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)
36.0%
(*.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)
38.3%
(*.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)
42.5%
(*.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 900 to 1 648 computations (43.2% saved)

simplify146.0ms (0.7%)

Memory
37.0MiB live, 221.2MiB allocated; 16ms collecting garbage
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(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 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)))))))
cost-diff0
(*.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 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))))))) R)
cost-diff1
(+.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 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))))))
cost-diff15
(/.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))))
cost-diff0
(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)))
cost-diff0
#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))))
cost-diff0
(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)))))
cost-diff0
(*.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)
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
068811
0117811
1225811
2561811
31755736
45236736
08148721
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 #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)
(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)))))
#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))))
(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)))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi2)
phi2
(cos.f64 phi1)
phi1
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(sin.f64 lambda1)
lambda1
lambda2
(cos.f64 lambda1)
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(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 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))))))) R)
(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 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 (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 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 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(/.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 (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)))
(pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
#s(literal 2 binary64)
(pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
(-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (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 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 #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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (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)) (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)))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#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))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(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)))
(fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi2)
phi2
(cos.f64 phi1)
phi1
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(sin.f64 lambda1)
lambda1
lambda2
(cos.f64 lambda1)
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(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 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))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 phi1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(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 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)))))))
(acos.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 #s(literal 1 binary64) (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)) (/.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))))))
(fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 #s(literal 1 binary64) (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)) (/.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 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 #s(literal 1 binary64) (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)
(/.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 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.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 (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 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
#s(literal 2 binary64)
(pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))
(pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(cos.f64 lambda1)
(-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
R

localize482.0ms (2.4%)

Memory
4.1MiB live, 1 190.0MiB allocated; 146ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.2578125
(pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))
accuracy0.2734375
(pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))
accuracy0.28125
(/.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))))
accuracy4.251350824552931
(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 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)))))))
accuracy0.20703125
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
accuracy0.23828125
(*.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)
accuracy4.251350824552931
(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)))))
accuracy29.099154513961466
#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))))
accuracy0.30078125
(*.f64 #s(literal -1/6 binary64) phi2)
accuracy4.251350824552931
(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)))))
accuracy14.830655218095725
(cos.f64 (-.f64 lambda1 lambda2))
accuracy31.39168487843029
#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.23828125
(*.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)
accuracy4.251350824552931
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
accuracy14.830655218095725
(cos.f64 (-.f64 lambda2 lambda1))
accuracy29.281298348720288
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
accuracy0.19140625
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
accuracy0.20703125
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
accuracy0.23828125
(*.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)
accuracy4.251350824552931
(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
335.0ms200×1valid
30.0ms53×0valid
4.0ms2valid
3.0ms3valid
Compiler

Compiled 697 to 56 computations (92% saved)

Precisions
Click to see histograms. Total time spent on operations: 281.0ms
ival-cos: 75.0ms (26.7% of total)
ival-mult: 54.0ms (19.3% of total)
ival-sin: 49.0ms (17.5% of total)
adjust: 37.0ms (13.2% of total)
ival-acos: 23.0ms (8.2% of total)
ival-add: 14.0ms (5% of total)
ival-sub: 9.0ms (3.2% of total)
ival-pow2: 9.0ms (3.2% of total)
const: 6.0ms (2.1% of total)
ival-div: 3.0ms (1.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series152.0ms (0.8%)

Memory
5.9MiB live, 387.6MiB allocated; 47ms collecting garbage
Counts
27 → 155
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 (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)
(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)))))
#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))))
(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)))
(/.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 (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 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 (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 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))))))) R)
(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 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 (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 #s(literal -1/6 binary64) phi2)
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(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))
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 (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))))
(+ (* (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)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* lambda2 (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (* (cos phi1) (cos phi2))))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi1) (cos phi2))) (* -1/6 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))))) (* lambda2 (* (cos phi1) (cos phi2))))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (* -1 (/ (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))) (cos lambda2))) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (* -1/2 (cos lambda2))))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (+ (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (* -1 (/ (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))) (cos lambda2))) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (* -1/2 (cos lambda2))))) (cos lambda2))) (+ (* -1/2 (sin lambda2)) (* 1/6 (sin lambda2)))))) (* -1 (/ (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))) (cos lambda2)))) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (* -1/2 (cos lambda2))))) (* -1 (sin lambda2)))))
(+ (* lambda1 (- (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))))) (cos lambda2))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2))))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (- (* lambda1 (- (+ (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))))) (cos lambda2))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2))))))) (cos lambda2))) (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* 1/6 (* (cos phi1) (* (cos phi2) (sin lambda2)))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))))) (cos lambda2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2))))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos 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) (* 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)
(+ (* -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))
(* (pow lambda1 2) (pow (sin lambda2) 2))
(* (pow lambda1 2) (+ (* -1/3 (* (pow lambda1 2) (pow (sin lambda2) 2))) (pow (sin lambda2) 2)))
(* (pow lambda1 2) (+ (* (pow lambda1 2) (+ (* -1/3 (pow (sin lambda2) 2)) (* 2/45 (* (pow lambda1 2) (pow (sin lambda2) 2))))) (pow (sin lambda2) 2)))
(* (pow lambda1 2) (+ (* (pow lambda1 2) (+ (* -1/3 (pow (sin lambda2) 2)) (* (pow lambda1 2) (+ (* -1/315 (* (pow lambda1 2) (pow (sin lambda2) 2))) (* 2/45 (pow (sin lambda2) 2)))))) (pow (sin 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)))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos (- lambda2 lambda1))
(cos (- lambda1 lambda2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (sin lambda1) 2) (pow (sin 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))))
(cos (+ 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))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1 (/ (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))) (cos lambda1))) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (* -1/2 (cos lambda1))))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))) (cos lambda1))) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (* -1/2 (cos lambda1))))) (cos lambda1))) (+ (* -1/2 (sin lambda1)) (* 1/6 (sin lambda1)))))) (* -1 (/ (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))) (cos lambda1)))) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (* -1/2 (cos lambda1))))) (* -1 (sin lambda1)))))
(+ (* lambda2 (- (* lambda2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))))) (cos lambda1))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (- (* lambda2 (- (+ (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))))) (cos lambda1))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (cos lambda1))) (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/6 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))))) (cos lambda1)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (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) (* 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))
(* (pow lambda2 2) (pow (sin lambda1) 2))
(* (pow lambda2 2) (+ (* -1/3 (* (pow lambda2 2) (pow (sin lambda1) 2))) (pow (sin lambda1) 2)))
(* (pow lambda2 2) (+ (* (pow lambda2 2) (+ (* -1/3 (pow (sin lambda1) 2)) (* 2/45 (* (pow lambda2 2) (pow (sin lambda1) 2))))) (pow (sin lambda1) 2)))
(* (pow lambda2 2) (+ (* (pow lambda2 2) (+ (* -1/3 (pow (sin lambda1) 2)) (* (pow lambda2 2) (+ (* -1/315 (* (pow lambda2 2) (pow (sin lambda1) 2))) (* 2/45 (pow (sin lambda1) 2)))))) (pow (sin lambda1) 2)))
(* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (+ (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2) (/ (* (sin phi1) (sin phi2)) 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 (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1 (/ (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) lambda2)))))
(cos (neg (+ 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)))))
(* 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))))))))
(* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))))) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))
(+ (* phi1 (sin phi2)) (/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (/ (* phi1 (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))) (/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(+ (* -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))))))))))
(* (sin phi1) (sin phi2))
(* (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))))
(* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))))) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))
(+ (* phi2 (sin phi1)) (/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (/ (* phi2 (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))) (/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(+ (* -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))))))))))
(* -1/6 phi2)
Calls

15 calls:

TimeVariablePointExpression
28.0ms
phi2
@-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)) (* (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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* -1/6 phi2) (* (sin phi2) (sin phi1)) (pow (* (cos lambda2) (cos lambda1)) 2) (pow (* (sin lambda2) (sin lambda1)) 2))
19.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)) (* (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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* -1/6 phi2) (* (sin phi2) (sin phi1)) (pow (* (cos lambda2) (cos lambda1)) 2) (pow (* (sin lambda2) (sin lambda1)) 2))
13.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)) (* (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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* -1/6 phi2) (* (sin phi2) (sin phi1)) (pow (* (cos lambda2) (cos lambda1)) 2) (pow (* (sin lambda2) (sin lambda1)) 2))
13.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)) (* (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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* -1/6 phi2) (* (sin phi2) (sin phi1)) (pow (* (cos lambda2) (cos lambda1)) 2) (pow (* (sin lambda2) (sin lambda1)) 2))
10.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)) (* (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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* -1/6 phi2) (* (sin phi2) (sin phi1)) (pow (* (cos lambda2) (cos lambda1)) 2) (pow (* (sin lambda2) (sin lambda1)) 2))

simplify191.0ms (0.9%)

Memory
10.4MiB live, 388.6MiB allocated; 23ms collecting garbage
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06464232
124623958
276693810
081043529
Stop Event
iter limit
node limit
Counts
155 → 155
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 (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))))
(+ (* (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)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* lambda2 (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (* (cos phi1) (cos phi2))))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi1) (cos phi2))) (* -1/6 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))))) (* lambda2 (* (cos phi1) (cos phi2))))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (* -1 (/ (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))) (cos lambda2))) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (* -1/2 (cos lambda2))))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (+ (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (* -1 (/ (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))) (cos lambda2))) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (* -1/2 (cos lambda2))))) (cos lambda2))) (+ (* -1/2 (sin lambda2)) (* 1/6 (sin lambda2)))))) (* -1 (/ (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))) (cos lambda2)))) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (* -1/2 (cos lambda2))))) (* -1 (sin lambda2)))))
(+ (* lambda1 (- (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))))) (cos lambda2))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2))))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (- (* lambda1 (- (+ (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))))) (cos lambda2))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2))))))) (cos lambda2))) (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* 1/6 (* (cos phi1) (* (cos phi2) (sin lambda2)))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))))) (cos lambda2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2))))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos 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) (* 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)
(+ (* -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))
(* (pow lambda1 2) (pow (sin lambda2) 2))
(* (pow lambda1 2) (+ (* -1/3 (* (pow lambda1 2) (pow (sin lambda2) 2))) (pow (sin lambda2) 2)))
(* (pow lambda1 2) (+ (* (pow lambda1 2) (+ (* -1/3 (pow (sin lambda2) 2)) (* 2/45 (* (pow lambda1 2) (pow (sin lambda2) 2))))) (pow (sin lambda2) 2)))
(* (pow lambda1 2) (+ (* (pow lambda1 2) (+ (* -1/3 (pow (sin lambda2) 2)) (* (pow lambda1 2) (+ (* -1/315 (* (pow lambda1 2) (pow (sin lambda2) 2))) (* 2/45 (pow (sin lambda2) 2)))))) (pow (sin 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)))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos (- lambda2 lambda1))
(cos (- lambda1 lambda2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (sin lambda1) 2) (pow (sin 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))))
(cos (+ 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))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1 (/ (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))) (cos lambda1))) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (* -1/2 (cos lambda1))))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))) (cos lambda1))) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (* -1/2 (cos lambda1))))) (cos lambda1))) (+ (* -1/2 (sin lambda1)) (* 1/6 (sin lambda1)))))) (* -1 (/ (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))) (cos lambda1)))) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (* -1/2 (cos lambda1))))) (* -1 (sin lambda1)))))
(+ (* lambda2 (- (* lambda2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))))) (cos lambda1))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (- (* lambda2 (- (+ (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))))) (cos lambda1))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (cos lambda1))) (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/6 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))))) (cos lambda1)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (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) (* 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))
(* (pow lambda2 2) (pow (sin lambda1) 2))
(* (pow lambda2 2) (+ (* -1/3 (* (pow lambda2 2) (pow (sin lambda1) 2))) (pow (sin lambda1) 2)))
(* (pow lambda2 2) (+ (* (pow lambda2 2) (+ (* -1/3 (pow (sin lambda1) 2)) (* 2/45 (* (pow lambda2 2) (pow (sin lambda1) 2))))) (pow (sin lambda1) 2)))
(* (pow lambda2 2) (+ (* (pow lambda2 2) (+ (* -1/3 (pow (sin lambda1) 2)) (* (pow lambda2 2) (+ (* -1/315 (* (pow lambda2 2) (pow (sin lambda1) 2))) (* 2/45 (pow (sin lambda1) 2)))))) (pow (sin lambda1) 2)))
(* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (+ (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2) (/ (* (sin phi1) (sin phi2)) 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 (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1 (/ (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) lambda2)))))
(cos (neg (+ 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)))))
(* 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))))))))
(* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))))) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))
(+ (* phi1 (sin phi2)) (/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (/ (* phi1 (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))) (/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(+ (* -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))))))))))
(* (sin phi1) (sin phi2))
(* (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))))
(* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))))) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))
(+ (* phi2 (sin phi1)) (/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (/ (* phi2 (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))) (/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(+ (* -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))))))))))
(* -1/6 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(+ (* (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 phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (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 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) (*.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 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) #s(literal -1/6 binary64)) (*.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)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (* lambda2 (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (* (cos phi1) (cos phi2))))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) lambda1 lambda2)) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi1) (cos phi2))) (* -1/6 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))))) (* lambda2 (* (cos phi1) (cos phi2))))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) lambda1 lambda2) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (*.f64 lambda1 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (* -1 (/ (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))) (cos lambda2))) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (* -1/2 (cos lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal -1 binary64) (cos.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (cos.f64 lambda2)))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (+ (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (* -1 (/ (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))) (cos lambda2))) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (* -1/2 (cos lambda2))))) (cos lambda2))) (+ (* -1/2 (sin lambda2)) (* 1/6 (sin lambda2)))))) (* -1 (/ (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))) (cos lambda2)))) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (* -1/2 (cos lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (neg.f64 lambda1) (fma.f64 (neg.f64 (sin.f64 lambda2)) (/.f64 (-.f64 (/.f64 #s(literal -1 binary64) (cos.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (cos.f64 lambda2)))) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) #s(literal -1/3 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (cos.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (* lambda1 (- (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))))) (cos lambda2))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2))))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))
(+ (* lambda1 (- (* lambda1 (- (+ (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))))) (cos lambda2))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2))))))) (cos lambda2))) (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* 1/6 (* (cos phi1) (* (cos phi2) (sin lambda2)))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda2) 2) (* -1 (pow (cos lambda2) 2))))) (cos lambda2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2))))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (neg.f64 lambda1) (fma.f64 (neg.f64 (sin.f64 lambda2)) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) #s(literal -1/3 binary64))))) (/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1)))) (cos.f64 lambda2))) (*.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 (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (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 phi1)) (cos.f64 phi2) (*.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 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.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))
(+ (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.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)))
(* (pow lambda1 2) (pow (sin lambda2) 2))
(*.f64 (*.f64 lambda1 lambda1) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(* (pow lambda1 2) (+ (* -1/3 (* (pow lambda1 2) (pow (sin lambda2) 2))) (pow (sin lambda2) 2)))
(*.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* (pow lambda1 2) (+ (* -1/3 (pow (sin lambda2) 2)) (* 2/45 (* (pow lambda1 2) (pow (sin lambda2) 2))))) (pow (sin lambda2) 2)))
(*.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (fma.f64 #s(literal 2/45 binary64) (*.f64 lambda1 lambda1) #s(literal -1/3 binary64))) (*.f64 lambda1 lambda1) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* (pow lambda1 2) (+ (* -1/3 (pow (sin lambda2) 2)) (* (pow lambda1 2) (+ (* -1/315 (* (pow lambda1 2) (pow (sin lambda2) 2))) (* 2/45 (pow (sin lambda2) 2)))))) (pow (sin lambda2) 2)))
(*.f64 (fma.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (fma.f64 #s(literal -1/315 binary64) (*.f64 lambda1 lambda1) #s(literal 2/45 binary64))) (*.f64 lambda1 lambda1) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (*.f64 lambda1 lambda1) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 lambda1 lambda1))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (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))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(/ (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))
(* (pow (sin lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (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))
(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))) (* (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 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (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 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 lambda1) lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (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 #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)))) (*.f64 lambda2 lambda2) (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (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))))
(*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (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 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 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))))
(fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.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))) (*.f64 lambda2 lambda2)))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1 (/ (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))) (cos lambda1))) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (* -1/2 (cos lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal -1 binary64) (cos.f64 lambda1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (/.f64 (neg.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))) (cos lambda1))) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (* -1/2 (cos lambda1))))) (cos lambda1))) (+ (* -1/2 (sin lambda1)) (* 1/6 (sin lambda1)))))) (* -1 (/ (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))) (cos lambda1)))) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (* -1/2 (cos lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda1)) (/.f64 (-.f64 (/.f64 #s(literal -1 binary64) (cos.f64 lambda1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (/.f64 (neg.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)))) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) #s(literal -1/3 binary64))) (neg.f64 lambda2)) (/.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (* lambda2 (- (* lambda2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))))) (cos lambda1))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))
(+ (* lambda2 (- (* lambda2 (- (+ (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))))) (cos lambda1))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (cos lambda1))) (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/6 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (- (pow (sin lambda1) 2) (* -1 (pow (cos lambda1) 2))))) (cos lambda1)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda1)) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (cos.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) #s(literal -1/3 binary64)))) (neg.f64 lambda2)) (/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1)))) (cos.f64 lambda1))) (*.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 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))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (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 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 lambda1) lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2)) (cos.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))))
(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)))) (*.f64 lambda2 lambda2) (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (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 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (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))
(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)))
(* (pow lambda2 2) (pow (sin lambda1) 2))
(*.f64 (*.f64 lambda2 lambda2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))
(* (pow lambda2 2) (+ (* -1/3 (* (pow lambda2 2) (pow (sin lambda1) 2))) (pow (sin lambda1) 2)))
(*.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ (* (pow lambda2 2) (+ (* -1/3 (pow (sin lambda1) 2)) (* 2/45 (* (pow lambda2 2) (pow (sin lambda1) 2))))) (pow (sin lambda1) 2)))
(*.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (fma.f64 #s(literal 2/45 binary64) (*.f64 lambda2 lambda2) #s(literal -1/3 binary64))) (*.f64 lambda2 lambda2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ (* (pow lambda2 2) (+ (* -1/3 (pow (sin lambda1) 2)) (* (pow lambda2 2) (+ (* -1/315 (* (pow lambda2 2) (pow (sin lambda1) 2))) (* 2/45 (pow (sin lambda1) 2)))))) (pow (sin lambda1) 2)))
(*.f64 (fma.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (fma.f64 #s(literal -1/315 binary64) (*.f64 lambda2 lambda2) #s(literal 2/45 binary64))) (*.f64 lambda2 lambda2) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (*.f64 lambda2 lambda2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (*.f64 lambda2 lambda2))
(* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))
(*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (+ (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2) (/ (* (sin phi1) (sin phi2)) lambda2))))
(*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (/.f64 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) lambda2)) lambda2)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (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 (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1 (/ (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) lambda2)))))
(*.f64 (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (/.f64 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) lambda2))) (neg.f64 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (sin.f64 phi2) phi1 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) phi1 (sin.f64 phi2)) phi1 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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)))))))
(fma.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (pow.f64 phi1 #s(literal 3 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))))))))
(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))) (pow.f64 phi1 #s(literal 3 binary64)) (*.f64 (sin.f64 phi2) phi1))
(* (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 (*.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) (* 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 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))))) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) phi1) (sin.f64 phi2)) phi1 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(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 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))) phi1 (sin.f64 phi2)) phi1 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2)))
(/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))
(/.f64 (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 phi2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+ (* phi1 (sin phi2)) (/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(fma.f64 (cos.f64 phi2) (/.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (/ (* phi1 (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))) (/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(fma.f64 (sin.f64 phi2) phi1 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) phi1 (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 phi2))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (/ (* (cos phi2) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 phi2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal -1/6 binary64))) phi1 (sin.f64 phi2)) phi1 (/.f64 (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 phi2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* -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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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)))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (sin.f64 phi1) phi2 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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/2 binary64) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (sin.f64 phi1) phi2) #s(literal -1/6 binary64))) phi2 (sin.f64 phi1)) phi2 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 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)))))))
(fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64))) (pow.f64 phi2 #s(literal 3 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))))))))
(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))) (pow.f64 phi2 #s(literal 3 binary64)) (*.f64 (sin.f64 phi1) phi2))
(* (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/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) phi2) #s(literal -1/6 binary64))) phi2 (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))))) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1)) (sin.f64 phi1)) phi2 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) phi2) #s(literal -1/6 binary64))) phi2 (sin.f64 phi1)) phi2 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1)))
(/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))
(/.f64 (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 phi1)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+ (* phi2 (sin phi1)) (/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(fma.f64 (cos.f64 phi1) (/.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* -1/2 (/ (* phi2 (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))) (/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(fma.f64 (sin.f64 phi1) phi2 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi2 (cos.f64 phi1)) (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) phi2 (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 phi1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (/ (* (cos phi1) (- (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 phi1)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 phi1) phi2) #s(literal -1/6 binary64))) phi2 (sin.f64 phi1)) phi2 (/.f64 (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 phi1)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* -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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos 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 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2)) (*.f64 phi2 phi2)))
(* -1/6 phi2)
(*.f64 #s(literal -1/6 binary64) phi2)

rewrite241.0ms (1.2%)

Memory
-3.8MiB live, 466.6MiB allocated; 54ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
068580
0117464
1420464
23316464
08251449
Stop Event
iter limit
node limit
iter limit
Counts
27 → 575
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 (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)
(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)))))
#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))))
(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)))
(/.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 (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 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 (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 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))))))) R)
(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 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 (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 #s(literal -1/6 binary64) phi2)
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(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))
Outputs
(/.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 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 phi1)) (cos.f64 phi2)) (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 phi1)) (cos.f64 phi2)) (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 (*.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)))) (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)) (*.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 (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))) #s(literal 2 binary64) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 2 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))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 #s(literal 2 binary64) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.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 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #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 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(/.f64 (+.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 (*.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))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (/.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))) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (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 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (/.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))) (-.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 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(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 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 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 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 phi1)) (cos.f64 phi2))) (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 phi1)) (cos.f64 phi2))) (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 (/.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 (*.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 (*.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 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.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 lambda2)) (cos.f64 lambda1)))
(+.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)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (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 (*.f64 (cos.f64 (-.f64 lambda1 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 phi1)) (cos.f64 phi2))) (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 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)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(/.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 (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 (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 (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)))) (cos.f64 phi1)) (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.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 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.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 (*.f64 (cos.f64 phi1) (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 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.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 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 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 (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 phi1)) (cos.f64 phi2)) (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 phi1)) (cos.f64 phi2)) (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 (-.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))) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (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))) #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 (-.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))) (-.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 (-.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 (*.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) #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 lambda2)) (cos.f64 lambda1) #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 lambda2)) (cos.f64 lambda1) #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 lambda2)) (cos.f64 lambda1) #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 lambda2)) (cos.f64 lambda1) #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 lambda2)) (cos.f64 lambda1) #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 lambda2)) (cos.f64 lambda1) #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 lambda2)) (cos.f64 lambda1) #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 lambda2)) (cos.f64 lambda1) #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 lambda2)) (cos.f64 lambda1) #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 (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 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 phi1)) (cos.f64 phi2)) (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 lambda2)) (cos.f64 lambda1)))
(+.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 lambda2)) (cos.f64 lambda1) #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 phi1)) (cos.f64 phi2))) (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 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (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)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.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)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.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)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.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)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.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)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (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)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (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 2 binary64)) (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (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 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (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 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (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 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 phi2)) (sin.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.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 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) lambda2) (cos.f64 phi2)) (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) lambda2) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) lambda2) (sin.f64 lambda1) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) lambda2) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 lambda1) (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 lambda1)) lambda2 (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) lambda2 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) lambda2) (cos.f64 phi1)) (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) lambda2) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda1) lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 lambda1) lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 lambda2 (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 lambda2 (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 lambda1) (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) lambda2) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) lambda2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(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)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) lambda2)) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) lambda2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) lambda2)) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) lambda2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (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 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(-.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(-.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1))))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(+.f64 (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (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))) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (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 (-.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 lambda1) (cos.f64 lambda2)) #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)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.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 (pow.f64 (*.f64 (sin.f64 lambda1) (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 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.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 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 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 (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 (neg.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 (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 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 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64))) (*.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))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.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))))
(/.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 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.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))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(neg.f64 (/.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)))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(neg.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))) (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.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 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #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 (cos.f64 lambda1) (cos.f64 lambda2)))
(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 (cos.f64 lambda1) (cos.f64 lambda2)))
(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 (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 (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 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.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 (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 (*.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 lambda1 lambda2)) (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 phi1)) (cos.f64 phi2)) (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 phi1)) (cos.f64 phi2)) (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 (*.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)))) (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)) (*.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 (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))) #s(literal 2 binary64) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 2 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))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 #s(literal 2 binary64) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.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 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #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 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(/.f64 (+.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 (*.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))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (/.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))) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (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 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (/.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))) (-.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 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(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 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 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 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 phi1)) (cos.f64 phi2))) (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 phi1)) (cos.f64 phi2))) (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 (/.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 (*.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 (*.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 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.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 lambda2)) (cos.f64 lambda1)))
(+.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)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (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 (*.f64 (cos.f64 (-.f64 lambda1 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 phi1)) (cos.f64 phi2))) (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 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)))))
(acos.f64 (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 (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))) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (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 (*.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))) (-.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 (-.f64 lambda1 lambda2)))
(*.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)))
(/.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 (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)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (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 phi2 phi1)))) #s(literal 2 binary64))
(/.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 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (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 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.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 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))) (-.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 lambda2)) (cos.f64 lambda1))))
(/.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 lambda2)) (cos.f64 lambda1)) #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 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (*.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 lambda2)) (cos.f64 lambda1))))))
(/.f64 (neg.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)))) (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.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 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (*.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 (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)))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.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 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 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)))) (*.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)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (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))))) (*.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 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 #s(literal 2 binary64) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.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 phi2) (cos.f64 phi1))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (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 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(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 lambda2)) (cos.f64 lambda1)))
(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 lambda2)) (cos.f64 lambda1)))
(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 lambda2)) (cos.f64 lambda1)))
(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 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda2) (*.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 lambda2)) (cos.f64 lambda1)))
(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 lambda2)) (cos.f64 lambda1)))
(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 lambda2)) (cos.f64 lambda1)))
(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 lambda2)) (cos.f64 lambda1)))
(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 lambda2)) (cos.f64 lambda1)))
(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 lambda2)) (cos.f64 lambda1)))
(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 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.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 (*.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 lambda2)) (cos.f64 lambda1)))
(*.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 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (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 (-.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 lambda1) (cos.f64 lambda2)) #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)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.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 (pow.f64 (*.f64 (sin.f64 lambda1) (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 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.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 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 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 (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 (neg.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 (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 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 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64))) (*.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))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.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))))
(/.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 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.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))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(neg.f64 (/.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)))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(neg.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))) (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.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 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #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 (cos.f64 lambda1) (cos.f64 lambda2)))
(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 (cos.f64 lambda1) (cos.f64 lambda2)))
(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 (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 (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 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.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 (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 (-.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 3 binary64)) (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 (-.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 lambda1) (cos.f64 lambda2)) #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)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.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 (pow.f64 (*.f64 (sin.f64 lambda1) (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 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.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 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 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 (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 (neg.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 (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (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 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 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 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64))) (*.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))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.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))))
(/.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 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.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))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(neg.f64 (/.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)))) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(neg.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))) (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.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 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #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 (cos.f64 lambda1) (cos.f64 lambda2)))
(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 (cos.f64 lambda1) (cos.f64 lambda2)))
(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 (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 (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 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.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 (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 #s(literal -1/6 binary64) phi2)
(*.f64 phi2 #s(literal -1/6 binary64))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(/.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 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 lambda2))
(*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 lambda2)) (cos.f64 lambda1))
(*.f64 (fabs.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fabs.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (exp.f64 (log.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (exp.f64 (log.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(*.f64 (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(pow.f64 (exp.f64 (log.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 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 4 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 lambda2)) (sin.f64 lambda1))
(*.f64 (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(*.f64 (fabs.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fabs.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(*.f64 (exp.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (exp.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(pow.f64 (exp.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 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 4 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))))

eval139.0ms (0.7%)

Memory
6.5MiB live, 233.1MiB allocated; 27ms collecting garbage
Compiler

Compiled 26 278 to 3 469 computations (86.8% saved)

prune121.0ms (0.6%)

Memory
17.7MiB live, 208.9MiB allocated; 23ms collecting garbage
Pruning

62 alts after pruning (60 fresh and 2 done)

PrunedKeptTotal
New51743560
Fresh111728
Picked325
Done000
Total53162593
Accuracy
93.9%
Counts
593 → 62
Alt Table
Click to see full alt table
StatusAccuracyProgram
72.6%
(*.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)
72.6%
(*.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)
72.7%
(*.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)
42.4%
(*.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)
72.6%
(*.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)
72.8%
(*.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.1%
(*.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)
47.6%
(*.f64 (-.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 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
42.5%
(*.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)
93.3%
(*.f64 (acos.f64 (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))))) R)
72.8%
(*.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)
72.8%
(*.f64 (acos.f64 (-.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)))))) R)
93.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))) R)
56.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
56.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
72.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (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)))))))) R)
93.3%
(*.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.3%
(*.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.3%
(*.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 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
93.3%
(*.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 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 lambda2)) (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
72.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) R)
93.2%
(*.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)
93.2%
(*.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 lambda1) (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 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) R)
73.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.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 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (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))))))) R)
36.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
36.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)
43.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
41.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 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))))) R)
25.7%
(*.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)
52.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (/.f64 (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 phi1)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
42.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
45.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
93.3%
(*.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
40.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))))) R)
51.4%
(*.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 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
54.8%
(*.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)
49.3%
(*.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R)
52.3%
(*.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))) R)
33.6%
(*.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)
52.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1))))) R)
51.4%
(*.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)
72.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) R)
31.3%
(*.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)
36.0%
(*.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)
19.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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)))) R)
19.0%
(*.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)
19.0%
(*.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)
20.1%
(*.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.6%
(*.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)
31.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)
38.3%
(*.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)
42.5%
(*.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)
25.4%
(*.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)
26.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)
33.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 lambda1)) (cos.f64 phi1)))) R)
23.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
32.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
47.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (/.f64 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) lambda2)) lambda2)))) R)
24.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) R)
12.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) R)
14.1%
(*.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 lambda2 lambda1)))))) R)
30.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 (cos.f64 lambda2) (cos.f64 phi1))))) R)
Compiler

Compiled 5 634 to 3 461 computations (38.6% saved)

simplify108.0ms (0.5%)

Memory
4.7MiB live, 99.0MiB allocated; 14ms collecting garbage
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff2
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
cost-diff3
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
cost-diff3
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
cost-diff6
(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)))))
cost-diff0
(PI.f64)
cost-diff0
(/.f64 (PI.f64) #s(literal 2 binary64))
cost-diff0
(-.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)))))
cost-diff0
(*.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)
cost-diff0
(fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
cost-diff0
#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))))
cost-diff0
(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)))))
cost-diff0
(*.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)
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 lambda2 lambda1))))
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 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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
cost-diff0
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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)))))
cost-diff0
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))) R)
cost-diff1
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))
cost-diff6
(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)))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
073764
0126715
1235691
2593663
31648663
43864663
57420663
08016647
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 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))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(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)))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(cos.f64 phi1)
(cos.f64 phi2)
(*.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))
(*.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)))) #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 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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))
#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 lambda2 lambda1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))
(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 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
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)
(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)))))
#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))))
(fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(sin.f64 phi2)
phi2
phi1
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi2)
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 (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 (PI.f64) #s(literal 2 binary64))
(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))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.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
(cos.f64 phi2)
phi2
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(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 (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)))))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (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))))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (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)))))))
(*.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 (-.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 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(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)))))
(sin.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
R
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))) R)
(*.f64 R (acos.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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)))))
(acos.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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 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)))
(*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(cos.f64 phi1)
(cos.f64 phi2)
(*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))
(*.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)))) #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 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 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2 lambda1))))))
(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 lambda2 lambda1)) (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 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2 lambda1))))
#s(approx (* (cos (- lambda2 lambda1)) (cos phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(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)))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))
#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))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(sin.f64 phi2)
phi2
phi1
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi2)
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 (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 (PI.f64) #s(literal 2 binary64))
(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))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.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
(cos.f64 phi2)
phi2
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(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 (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)))))))) R)
(*.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.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (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))))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.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 (-.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 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.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 (-.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 (-.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)
(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)))))
(cos.f64 (-.f64 lambda1 lambda2))
(sin.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(literal 0 binary64)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(literal 1 binary64)
R

localize1.7s (8.6%)

Memory
-0.3MiB live, 2 826.3MiB allocated; 314ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy4.251350824552931
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (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))))))))
accuracy14.830655218095725
(cos.f64 (-.f64 lambda1 lambda2))
accuracy14.91073180243051
(sin.f64 (-.f64 lambda2 lambda1))
accuracy61.920506293690316
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
accuracy0.23828125
(*.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)
accuracy0.4778429348748632
(asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
accuracy3.987977340314529
(-.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)))))
accuracy14.830655218095725
(cos.f64 (-.f64 lambda2 lambda1))
accuracy0.23828125
(*.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)
accuracy4.251350824552931
(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)))))
accuracy14.830655218095725
(cos.f64 (-.f64 lambda2 lambda1))
accuracy32.51944001780154
#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))))
accuracy4.251350824552931
(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 lambda2 lambda1))))))
accuracy14.830655218095725
(cos.f64 (-.f64 lambda2 lambda1))
accuracy29.281298348720288
#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 lambda2 lambda1)))))
accuracy33.30436471680008
#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 lambda2 lambda1))))
accuracy0.20733131092597978
(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)))
accuracy0.21484375
(*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))
accuracy0.23828125
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))) R)
accuracy4.251350824552931
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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)))))
Samples
1.2s197×1valid
422.0ms58×2valid
20.0ms3valid
Compiler

Compiled 674 to 64 computations (90.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 1.5s
ival-sin: 924.0ms (59.6% of total)
ival-cos: 268.0ms (17.3% of total)
ival-mult: 123.0ms (7.9% of total)
adjust: 90.0ms (5.8% of total)
ival-acos: 70.0ms (4.5% of total)
ival-add: 50.0ms (3.2% of total)
ival-asin: 10.0ms (0.6% of total)
ival-sub: 8.0ms (0.5% of total)
ival-div: 4.0ms (0.3% of total)
ival-pi: 2.0ms (0.1% of total)
exact: 1.0ms (0.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series150.0ms (0.7%)

Memory
5.4MiB live, 329.7MiB allocated; 26ms collecting garbage
Counts
26 → 171
Calls
Call 1
Inputs
(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)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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)))))
(*.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 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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))
#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 lambda2 lambda1))))
(*.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)
(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)))))
#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))))
(fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.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 (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 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(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)))))
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(sin.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 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(sin.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (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))))))))
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 (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* (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)))
(+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(+ (* (cos (neg lambda2)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos lambda2) (cos (* 1/2 (PI))))) (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))))) (+ (* (cos (neg lambda2)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos lambda2) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin lambda2)))))))) (+ (* (cos (neg lambda2)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos lambda2) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin lambda2))) (* lambda1 (+ (* 1/6 (* (cos lambda2) (cos (* 1/2 (PI))))) (* 1/6 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))))))))))) (+ (* (cos (neg lambda2)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin lambda2))))
(* (cos (neg lambda2)) (sin (* 1/2 (PI))))
(+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))) (* (cos (neg lambda2)) (sin (* 1/2 (PI)))))
(+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (* 1/2 (PI)))))))) (* (cos (neg lambda2)) (sin (* 1/2 (PI)))))
(+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (* 1/2 (PI))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))))))) (* (cos (neg lambda2)) (sin (* 1/2 (PI)))))
(* 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)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(sin lambda2)
(+ (sin lambda2) (* -1 (* lambda1 (cos lambda2))))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* -1/2 (* lambda1 (sin lambda2))))))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (* 1/6 (* lambda1 (cos 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)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos (* 1/2 (PI))) (sin (- lambda2 lambda1))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (sin phi1) (sin phi2))))
(+ (* (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)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* (cos (* 1/2 (PI))) (sin (- lambda2 lambda1))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))
(* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))
(* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(cos (- lambda2 lambda1))
(sin (- lambda2 lambda1))
(cos (- lambda1 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))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))
(+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (+ lambda2 (* -1 lambda1)))))
(* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (PI))))
(cos (+ lambda2 (* -1 lambda1)))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(sin (+ lambda2 (* -1 lambda1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (+ lambda2 (* -1 lambda1))))))) (* (sin phi1) (sin phi2))))
(* (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))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1))))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(+ (* (cos lambda1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg lambda1))))
(+ (* lambda2 (+ (* (cos (neg lambda1)) (cos (* 1/2 (PI)))) (* (sin lambda1) (sin (* 1/2 (PI)))))) (+ (* (cos lambda1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg lambda1)))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg lambda1)))))) (+ (* (cos (neg lambda1)) (cos (* 1/2 (PI)))) (* (sin lambda1) (sin (* 1/2 (PI))))))) (+ (* (cos lambda1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg lambda1)))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg lambda1)))) (* lambda2 (+ (* -1/6 (* (cos (neg lambda1)) (cos (* 1/2 (PI))))) (* -1/6 (* (sin lambda1) (sin (* 1/2 (PI)))))))))) (+ (* (cos (neg lambda1)) (cos (* 1/2 (PI)))) (* (sin lambda1) (sin (* 1/2 (PI))))))) (+ (* (cos lambda1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg lambda1)))))
(* (cos lambda1) (sin (* 1/2 (PI))))
(+ (* lambda2 (* (sin lambda1) (sin (* 1/2 (PI))))) (* (cos lambda1) (sin (* 1/2 (PI)))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (* 1/2 (PI)))))) (* (sin lambda1) (sin (* 1/2 (PI)))))) (* (cos lambda1) (sin (* 1/2 (PI)))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (* 1/2 (PI))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (* 1/2 (PI)))))))) (* (sin lambda1) (sin (* 1/2 (PI)))))) (* (cos lambda1) (sin (* 1/2 (PI)))))
(* 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)))))
(sin (neg lambda1))
(+ (sin (neg lambda1)) (* lambda2 (cos (neg lambda1))))
(+ (sin (neg lambda1)) (* lambda2 (+ (cos (neg lambda1)) (* -1/2 (* lambda2 (sin (neg lambda1)))))))
(+ (sin (neg lambda1)) (* lambda2 (+ (cos (neg lambda1)) (* lambda2 (+ (* -1/2 (sin (neg lambda1))) (* -1/6 (* lambda2 (cos (neg lambda1)))))))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* 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)))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))
(+ (* (cos (* 1/2 (PI))) (sin (neg (+ lambda1 (* -1 lambda2))))) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (PI)))))
(* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (PI))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(sin (neg (+ lambda1 (* -1 lambda2))))
(cos (+ lambda1 (* -1 lambda2)))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos (* 1/2 (PI))) (sin (neg (+ lambda1 (* -1 lambda2))))) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (PI))))))) (* (sin phi1) (sin phi2))))
(+ (* (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))))))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (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)))))))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (/ (* (cos phi2) (cos (- lambda2 lambda1))) phi1)))
(* -1 (* phi1 (+ (* -1 (sin phi2)) (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) phi1)))))
(+ (* (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))))
(+ (cos (- lambda2 lambda1)) (* phi1 phi2))
(+ (cos (- lambda2 lambda1)) (* phi2 (+ phi1 (* -1/2 (* phi2 (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* phi2 (+ phi1 (* phi2 (+ (* -1/2 (cos (- lambda2 lambda1))) (* -1/6 (* phi1 phi2)))))))
(* (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)))))))))
Calls

15 calls:

TimeVariablePointExpression
32.0ms
phi1
@inf
((+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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)) (* (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) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (* (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (/ (PI) 2) (PI) (+ (* (sin (- lambda2 lambda1)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (sin (/ (PI) 2)) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (sin (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin (- lambda2 lambda1)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))))
31.0ms
lambda2
@inf
((+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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)) (* (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) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (* (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (/ (PI) 2) (PI) (+ (* (sin (- lambda2 lambda1)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (sin (/ (PI) 2)) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (sin (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin (- lambda2 lambda1)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))))
11.0ms
lambda1
@inf
((+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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)) (* (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) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (* (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (/ (PI) 2) (PI) (+ (* (sin (- lambda2 lambda1)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (sin (/ (PI) 2)) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (sin (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin (- lambda2 lambda1)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))))
10.0ms
lambda1
@-inf
((+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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)) (* (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) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (* (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (/ (PI) 2) (PI) (+ (* (sin (- lambda2 lambda1)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (sin (/ (PI) 2)) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (sin (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin (- lambda2 lambda1)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))))
10.0ms
phi2
@-inf
((+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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)) (* (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) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (* (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (/ (PI) 2) (PI) (+ (* (sin (- lambda2 lambda1)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (sin (/ (PI) 2)) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (sin (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin (- lambda2 lambda1)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))))

simplify175.0ms (0.9%)

Memory
-11.4MiB live, 284.6MiB allocated; 33ms collecting garbage
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06324006
125113756
258493735
082983450
Stop Event
iter limit
node limit
Counts
171 → 171
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 (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* (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)))
(+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(+ (* (cos (neg lambda2)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos lambda2) (cos (* 1/2 (PI))))) (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))))) (+ (* (cos (neg lambda2)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos lambda2) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin lambda2)))))))) (+ (* (cos (neg lambda2)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos lambda2) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin lambda2))) (* lambda1 (+ (* 1/6 (* (cos lambda2) (cos (* 1/2 (PI))))) (* 1/6 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))))))))))) (+ (* (cos (neg lambda2)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin lambda2))))
(* (cos (neg lambda2)) (sin (* 1/2 (PI))))
(+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))) (* (cos (neg lambda2)) (sin (* 1/2 (PI)))))
(+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (* 1/2 (PI)))))))) (* (cos (neg lambda2)) (sin (* 1/2 (PI)))))
(+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (* 1/2 (PI))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))))))) (* (cos (neg lambda2)) (sin (* 1/2 (PI)))))
(* 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)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(sin lambda2)
(+ (sin lambda2) (* -1 (* lambda1 (cos lambda2))))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* -1/2 (* lambda1 (sin lambda2))))))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (* 1/6 (* lambda1 (cos 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)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos (* 1/2 (PI))) (sin (- lambda2 lambda1))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (sin phi1) (sin phi2))))
(+ (* (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)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* (cos (* 1/2 (PI))) (sin (- lambda2 lambda1))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))
(* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))
(* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(cos (- lambda2 lambda1))
(sin (- lambda2 lambda1))
(cos (- lambda1 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))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))
(+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (+ lambda2 (* -1 lambda1)))))
(* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (PI))))
(cos (+ lambda2 (* -1 lambda1)))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(sin (+ lambda2 (* -1 lambda1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (+ lambda2 (* -1 lambda1))))))) (* (sin phi1) (sin phi2))))
(* (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))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1))))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(+ (* (cos lambda1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg lambda1))))
(+ (* lambda2 (+ (* (cos (neg lambda1)) (cos (* 1/2 (PI)))) (* (sin lambda1) (sin (* 1/2 (PI)))))) (+ (* (cos lambda1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg lambda1)))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg lambda1)))))) (+ (* (cos (neg lambda1)) (cos (* 1/2 (PI)))) (* (sin lambda1) (sin (* 1/2 (PI))))))) (+ (* (cos lambda1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg lambda1)))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg lambda1)))) (* lambda2 (+ (* -1/6 (* (cos (neg lambda1)) (cos (* 1/2 (PI))))) (* -1/6 (* (sin lambda1) (sin (* 1/2 (PI)))))))))) (+ (* (cos (neg lambda1)) (cos (* 1/2 (PI)))) (* (sin lambda1) (sin (* 1/2 (PI))))))) (+ (* (cos lambda1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg lambda1)))))
(* (cos lambda1) (sin (* 1/2 (PI))))
(+ (* lambda2 (* (sin lambda1) (sin (* 1/2 (PI))))) (* (cos lambda1) (sin (* 1/2 (PI)))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (* 1/2 (PI)))))) (* (sin lambda1) (sin (* 1/2 (PI)))))) (* (cos lambda1) (sin (* 1/2 (PI)))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (* 1/2 (PI))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (* 1/2 (PI)))))))) (* (sin lambda1) (sin (* 1/2 (PI)))))) (* (cos lambda1) (sin (* 1/2 (PI)))))
(* 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)))))
(sin (neg lambda1))
(+ (sin (neg lambda1)) (* lambda2 (cos (neg lambda1))))
(+ (sin (neg lambda1)) (* lambda2 (+ (cos (neg lambda1)) (* -1/2 (* lambda2 (sin (neg lambda1)))))))
(+ (sin (neg lambda1)) (* lambda2 (+ (cos (neg lambda1)) (* lambda2 (+ (* -1/2 (sin (neg lambda1))) (* -1/6 (* lambda2 (cos (neg lambda1)))))))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* 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)))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))
(+ (* (cos (* 1/2 (PI))) (sin (neg (+ lambda1 (* -1 lambda2))))) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (PI)))))
(* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (PI))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(sin (neg (+ lambda1 (* -1 lambda2))))
(cos (+ lambda1 (* -1 lambda2)))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos (* 1/2 (PI))) (sin (neg (+ lambda1 (* -1 lambda2))))) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (PI))))))) (* (sin phi1) (sin phi2))))
(+ (* (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))))))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (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)))))))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (/ (* (cos phi2) (cos (- lambda2 lambda1))) phi1)))
(* -1 (* phi1 (+ (* -1 (sin phi2)) (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) phi1)))))
(+ (* (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))))
(+ (cos (- lambda2 lambda1)) (* phi1 phi2))
(+ (cos (- lambda2 lambda1)) (* phi2 (+ phi1 (* -1/2 (* phi2 (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* phi2 (+ phi1 (* phi2 (+ (* -1/2 (cos (- lambda2 lambda1))) (* -1/6 (* phi1 phi2)))))))
(* (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)))))))))
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 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 (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/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)
(* (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 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 (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)))
(+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (+ (* phi1 (sin phi2)) (* (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 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (+ (* phi1 (sin phi2)) (* (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 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/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)))))
(+ (* (cos (neg lambda2)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin lambda2)))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 lambda2) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos lambda2) (cos (* 1/2 (PI))))) (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))))) (+ (* (cos (neg lambda2)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin lambda2))))
(fma.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (PI.f64))) (cos.f64 lambda2) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 lambda2))) lambda1 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 lambda2) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos lambda2) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin lambda2)))))))) (+ (* (cos (neg lambda2)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin lambda2))))
(fma.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (PI.f64))) (cos.f64 lambda2) (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 lambda2) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda2)))) lambda1 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 lambda2)))) lambda1 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 lambda2) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos lambda2) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin lambda2))) (* lambda1 (+ (* 1/6 (* (cos lambda2) (cos (* 1/2 (PI))))) (* 1/6 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))))))))))) (+ (* (cos (neg lambda2)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin lambda2))))
(fma.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (PI.f64))) (cos.f64 lambda2) (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 lambda2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 lambda2)))) lambda1 (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 lambda2) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda2))))) lambda1 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 lambda2)))) lambda1 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 lambda2) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda2))))
(* (cos (neg lambda2)) (sin (* 1/2 (PI))))
(*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda2))
(+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))) (* (cos (neg lambda2)) (sin (* 1/2 (PI)))))
(fma.f64 (*.f64 (sin.f64 lambda2) lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (* 1/2 (PI)))))))) (* (cos (neg lambda2)) (sin (* 1/2 (PI)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda2)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 lambda2))) lambda1 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (* 1/2 (PI))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))))))) (* (cos (neg lambda2)) (sin (* 1/2 (PI)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) lambda1 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 lambda2))) lambda1 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda2)))
(* 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))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(sin lambda2)
(sin.f64 lambda2)
(+ (sin lambda2) (* -1 (* lambda1 (cos lambda2))))
(fma.f64 (neg.f64 lambda1) (cos.f64 lambda2) (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* -1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 lambda2) (neg.f64 (cos.f64 lambda2))) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (* 1/6 (* lambda1 (cos lambda2))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))) lambda1 (neg.f64 (cos.f64 lambda2))) lambda1 (sin.f64 lambda2))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos (* 1/2 (PI))) (sin (- lambda2 lambda1))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (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 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))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* (cos (* 1/2 (PI))) (sin (- lambda2 lambda1))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))
(*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(sin (- lambda2 lambda1))
(sin.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 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 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))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/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)
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/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)))))
(+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (+ lambda2 (* -1 lambda1)))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (PI))))
(*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(sin (+ lambda2 (* -1 lambda1)))
(sin.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (+ lambda2 (* -1 lambda1))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (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)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(+ (* (cos lambda1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg lambda1))))
(fma.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda1)))
(+ (* lambda2 (+ (* (cos (neg lambda1)) (cos (* 1/2 (PI)))) (* (sin lambda1) (sin (* 1/2 (PI)))))) (+ (* (cos lambda1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg lambda1)))))
(fma.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (PI.f64))) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 lambda1)) lambda2 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg lambda1)))))) (+ (* (cos (neg lambda1)) (cos (* 1/2 (PI)))) (* (sin lambda1) (sin (* 1/2 (PI))))))) (+ (* (cos lambda1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg lambda1)))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda1)))) lambda2) lambda2 (fma.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (PI.f64))) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 lambda1)) lambda2 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg lambda1)))) (* lambda2 (+ (* -1/6 (* (cos (neg lambda1)) (cos (* 1/2 (PI))))) (* -1/6 (* (sin lambda1) (sin (* 1/2 (PI)))))))))) (+ (* (cos (neg lambda1)) (cos (* 1/2 (PI)))) (* (sin lambda1) (sin (* 1/2 (PI))))))) (+ (* (cos lambda1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg lambda1)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 lambda1) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 lambda1)))) lambda2 (*.f64 #s(literal -1/2 binary64) (fma.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda1))))) lambda2) lambda2 (fma.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (PI.f64))) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 lambda1)) lambda2 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(* (cos lambda1) (sin (* 1/2 (PI))))
(*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda1))
(+ (* lambda2 (* (sin lambda1) (sin (* 1/2 (PI))))) (* (cos lambda1) (sin (* 1/2 (PI)))))
(*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (* 1/2 (PI)))))) (* (sin lambda1) (sin (* 1/2 (PI)))))) (* (cos lambda1) (sin (* 1/2 (PI)))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (* 1/2 (PI))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (* 1/2 (PI)))))))) (* (sin lambda1) (sin (* 1/2 (PI)))))) (* (cos lambda1) (sin (* 1/2 (PI)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) lambda2) lambda2 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))
(* 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))
(sin (neg lambda1))
(neg.f64 (sin.f64 lambda1))
(+ (sin (neg lambda1)) (* lambda2 (cos (neg lambda1))))
(fma.f64 (cos.f64 lambda1) lambda2 (neg.f64 (sin.f64 lambda1)))
(+ (sin (neg lambda1)) (* lambda2 (+ (cos (neg lambda1)) (* -1/2 (* lambda2 (sin (neg lambda1)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) lambda2 (neg.f64 (sin.f64 lambda1)))
(+ (sin (neg lambda1)) (* lambda2 (+ (cos (neg lambda1)) (* lambda2 (+ (* -1/2 (sin (neg lambda1))) (* -1/6 (* lambda2 (cos (neg lambda1)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) lambda2 (cos.f64 lambda1)) lambda2 (neg.f64 (sin.f64 lambda1)))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* 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))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/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)
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/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)))))
(+ (* (cos (* 1/2 (PI))) (sin (neg (+ lambda1 (* -1 lambda2))))) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (PI)))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (PI))))
(*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(sin (neg (+ lambda1 (* -1 lambda2))))
(sin.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos (* 1/2 (PI))) (sin (neg (+ lambda1 (* -1 lambda2))))) (* (cos (+ lambda1 (* -1 lambda2))) (sin (* 1/2 (PI))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+ (* (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 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* (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/24 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* (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 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi1 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.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 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) phi1 (sin.f64 phi2)) phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* 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 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) phi1 (sin.f64 phi2)) phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(* (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)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (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 lambda2) (sin.f64 lambda1)) (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 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 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (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 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (*.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 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(* phi1 (sin phi2))
(*.f64 (sin.f64 phi2) phi1)
(* phi1 (+ (sin phi2) (/ (* (cos phi2) (cos (- lambda2 lambda1))) phi1)))
(*.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) phi1)
(* -1 (* phi1 (+ (* -1 (sin phi2)) (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) phi1)))))
(*.f64 (neg.f64 phi1) (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 phi2) phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+ (* (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 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi2 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* (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/24 binary64) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 phi2 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* (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 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi2 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 phi2 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.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 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) phi2 (sin.f64 phi1)) phi2 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* 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 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) phi2 (sin.f64 phi1)) phi2 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(* (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)))
(+ (cos (- lambda2 lambda1)) (* phi1 phi2))
(fma.f64 phi2 phi1 (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda2 lambda1)) (* phi2 (+ phi1 (* -1/2 (* phi2 (cos (- lambda2 lambda1)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (-.f64 lambda1 lambda2)) phi1) phi2 (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda2 lambda1)) (* phi2 (+ phi1 (* phi2 (+ (* -1/2 (cos (- lambda2 lambda1))) (* -1/6 (* phi1 phi2)))))))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi2 phi1) #s(literal -1/6 binary64))) phi2 phi1) phi2 (cos.f64 (-.f64 lambda1 lambda2)))
(* (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 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.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 phi2 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (sin.f64 lambda2)))

rewrite217.0ms (1.1%)

Memory
-2.0MiB live, 271.6MiB allocated; 31ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
072491
0124482
1435386
24012386
08873386
Stop Event
iter limit
node limit
iter limit
Counts
26 → 511
Calls
Call 1
Inputs
(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)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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)))))
(*.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 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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))
#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 lambda2 lambda1))))
(*.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)
(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)))))
#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))))
(fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.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 (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 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(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)))))
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(sin.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 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(asin.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(sin.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (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))))))))
Outputs
(*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(*.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)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 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 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64))) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 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 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1))) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1))) (sin.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))))
(fma.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 0 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 0 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))) (/.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))))
(-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1))) (sin.f64 lambda2)))
(-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (*.f64 (neg.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(/.f64 (-.f64 (*.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1))))
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #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 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 2 binary64))) #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #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 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(fma.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 0 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi2)) (cos.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 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 lambda1)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.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 #s(literal 0 binary64) (*.f64 (cos.f64 phi2) (cos.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 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 0 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (neg.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 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.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 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (neg.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 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (neg.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 (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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (sin.f64 lambda2) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (sin.f64 lambda2)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 0 binary64)) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.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 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 0 binary64)) (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 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (neg.f64 (neg.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 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1))) (sin.f64 lambda2)))
(-.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1))) (sin.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(-.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 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) R) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) R) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 R (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (*.f64 R (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)))) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (asin.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)))))))) (+.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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(/.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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (asin.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)))))) (*.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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))))
(-.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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(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 (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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) (+.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 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) (*.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 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))))
(-.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 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi2) phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 phi2) phi1 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)) (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)) (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(fma.f64 (sin.f64 phi2) phi1 (*.f64 (neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) phi1))
(fma.f64 phi1 (sin.f64 phi2) (*.f64 (neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))
(fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (*.f64 (sin.f64 phi2) phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (sin.f64 phi2) phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (neg.f64 phi1) (sin.f64 phi2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)) (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)) (pow.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 phi2) phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))
(+.f64 (*.f64 (sin.f64 phi2) phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) R) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) R) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 R (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (*.f64 R (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)))) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(neg.f64 (/.f64 (PI.f64) #s(literal -2 binary64)))
(*.f64 (neg.f64 (sqrt.f64 (PI.f64))) (neg.f64 (sqrt.f64 (PI.f64))))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 1 binary64)))
(exp.f64 (log.f64 (PI.f64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 1 binary64))))
(+.f64 (cosh.f64 (log.f64 (PI.f64))) (sinh.f64 (log.f64 (PI.f64))))
(log.f64 (exp.f64 (PI.f64)))
(PI.f64)
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(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 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 1 binary64)))
(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 (-.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 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 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 0 binary64)))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (/.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)))
(+.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
#s(literal 0 binary64)
#s(literal 1 binary64)
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(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 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 1 binary64)))
(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 (-.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 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 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 0 binary64)))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (/.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)))
(+.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 lambda1))
(*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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 phi2) (cos.f64 phi1)) (sin.f64 lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.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 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #s(literal 2 binary64))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(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 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 1 binary64)))
(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 (-.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 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 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 0 binary64)))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (/.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)))
(+.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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)) (fma.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (PI.f64)) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (PI.f64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))))) (*.f64 #s(literal -2 binary64) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (PI.f64) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (PI.f64) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (fma.f64 (sin.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))))
(fma.f64 (sin.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(sin.f64 (-.f64 lambda2 lambda1))
(-.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(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 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 1 binary64)))
(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 (-.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 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 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 0 binary64)))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (/.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 0 binary64))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)))
(+.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))

eval129.0ms (0.6%)

Memory
-2.3MiB live, 192.1MiB allocated; 16ms collecting garbage
Compiler

Compiled 22 745 to 3 044 computations (86.6% saved)

prune143.0ms (0.7%)

Memory
-2.3MiB live, 248.3MiB allocated; 50ms collecting garbage
Pruning

65 alts after pruning (63 fresh and 2 done)

PrunedKeptTotal
New52628554
Fresh203555
Picked505
Done022
Total55165616
Accuracy
94.2%
Counts
616 → 65
Alt Table
Click to see full alt table
StatusAccuracyProgram
72.6%
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) R) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))))
72.6%
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) R) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
71.2%
(*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.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)
71.8%
(*.f64 (-.f64 (/.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.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)
72.5%
(*.f64 (-.f64 (/.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64))) #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)
72.7%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
72.8%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
47.6%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
31.3%
(*.f64 (-.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 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))) R)
42.5%
(*.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)
14.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)))) #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)
93.3%
(*.f64 (acos.f64 (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))))) R)
84.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))))) R)
56.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
56.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
72.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64))) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
93.3%
(*.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.3%
(*.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 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
93.3%
(*.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 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 lambda2)) (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
93.2%
(*.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)
93.2%
(*.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 lambda1) (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 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) R)
36.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
36.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)
43.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
41.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 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))))) R)
48.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
51.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
25.7%
(*.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)
42.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) phi1)))) R)
45.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) phi2)))) R)
51.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
54.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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)
52.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (/.f64 (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 phi1)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
93.3%
(*.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
49.3%
(*.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R)
52.3%
(*.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))) R)
33.6%
(*.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)
52.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1))))) R)
51.4%
(*.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)
72.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) R)
20.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
23.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
36.0%
(*.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)
19.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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)))) R)
19.0%
(*.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)
19.0%
(*.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)
20.1%
(*.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.6%
(*.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)
31.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)
38.3%
(*.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)
42.5%
(*.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)
25.4%
(*.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)
26.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)
33.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 lambda1)) (cos.f64 phi1)))) R)
23.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
32.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
24.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) R)
14.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))) R)
11.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
7.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 (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))) R)
7.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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) R)
8.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)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))) R)
10.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 (- lambda2 lambda1)) (cos.f64 lambda1)))))) R)
30.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 (cos.f64 lambda2) (cos.f64 phi1))))) R)
72.8%
(*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)
Compiler

Compiled 5 186 to 3 623 computations (30.1% saved)

simplify139.0ms (0.7%)

Memory
25.7MiB live, 208.2MiB allocated; 48ms collecting garbage
Algorithm
egg-herbie
Localize:

Found 20 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)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
cost-diff0
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
cost-diff1
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
cost-diff0
(*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R)
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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)))) R)
cost-diff3
(+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
cost-diff4
(cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
cost-diff8
(-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
cost-diff0
#s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))
cost-diff0
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))
cost-diff0
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))))
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
cost-diff0
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))
cost-diff0
(acos.f64 (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)))))
cost-diff0
(*.f64 (acos.f64 (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))))) R)
cost-diff6
(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))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
087949
0138934
1274906
2603844
31634806
43478806
57119806
08123786
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 (acos.f64 (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))))) R)
(acos.f64 (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 (*.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))))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
lambda1
(sin.f64 lambda2)
lambda2
(cos.f64 phi2)
phi2
(cos.f64 phi1)
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 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda1)
(cos.f64 lambda2)
(*.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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))
#s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))
(*.f64 (sin.f64 phi2) phi1)
(sin.f64 phi2)
phi2
phi1
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 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 (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))))
(cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
lambda1
(-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))
lambda2
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)
phi1
(cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))
(*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
R
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
#s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi1)
(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)
R
Outputs
(*.f64 (acos.f64 (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))))) R)
(*.f64 R (acos.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos.f64 (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)))))
(acos.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.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) (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 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda1)
lambda1
(sin.f64 lambda2)
lambda2
(cos.f64 phi2)
phi2
(cos.f64 phi1)
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 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda1)
(cos.f64 lambda2)
(*.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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))
#s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))
(*.f64 (sin.f64 phi2) phi1)
(sin.f64 phi2)
phi2
phi1
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1)) (neg.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)))) #s(literal 2 binary64)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1)) (neg.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)))) #s(literal 2 binary64))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1)) (neg.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)))) #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 lambda1 lambda2) phi1)) (neg.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)))) #s(literal 2 binary64))
(-.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))))
(-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1)) (neg.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1))))
(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 lambda2) phi1))
(-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(-.f64 (-.f64 lambda1 lambda2) phi1)
(-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
lambda1
(-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))
lambda2
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)
phi1
(cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(neg.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)))
(+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(fma.f64 #s(literal -2 binary64) (/.f64 (PI.f64) #s(literal -2 binary64)) (+.f64 (-.f64 lambda1 lambda2) 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))
(*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
R
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
#s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))
(cos.f64 phi1)
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(cos.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)
R

localize575.0ms (2.9%)

Memory
-4.7MiB live, 1 243.6MiB allocated; 181ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.20703125
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
accuracy0.23828125
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
accuracy4.251350824552931
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
accuracy29.068290766778563
#s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
accuracy0.1328125
(*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
accuracy0.23828125
(*.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R)
accuracy4.251350824552931
(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 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))))
accuracy30.711419214324955
#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 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))
accuracy6.647401966246097
(-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
accuracy29.281298348720288
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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)))
accuracy31.465502445009882
(cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
accuracy50.93136004903265
(cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
accuracy0.23828125
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
accuracy4.251350824552931
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))))
accuracy32.51944001780154
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))
accuracy38.38966271075171
#s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))
accuracy0.18359375
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
accuracy0.20703125
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
accuracy0.23828125
(*.f64 (acos.f64 (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))))) R)
accuracy4.251350824552931
(acos.f64 (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)))))
Samples
488.0ms249×1valid
4.0ms2valid
4.0ms3valid
2.0ms0valid
Compiler

Compiled 712 to 68 computations (90.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 428.0ms
ival-mult: 112.0ms (26.2% of total)
ival-cos: 108.0ms (25.2% of total)
adjust: 76.0ms (17.8% of total)
ival-sin: 47.0ms (11% of total)
ival-acos: 35.0ms (8.2% of total)
ival-add: 27.0ms (6.3% of total)
ival-sub: 14.0ms (3.3% of total)
ival-div: 7.0ms (1.6% of total)
ival-pi: 2.0ms (0.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series109.0ms (0.5%)

Memory
2.5MiB live, 148.0MiB allocated; 9ms collecting garbage
Counts
25 → 185
Calls
Call 1
Inputs
(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))))
(*.f64 (acos.f64 (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))))) R)
(acos.f64 (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)))))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))
#s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))
(-.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)))
(+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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)))) 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 lambda2) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))
(*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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)))
#s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (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 (+ (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* lambda1 (* (cos phi2) (sin lambda2)))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2))))
(* lambda1 (+ (* (cos phi2) (sin lambda2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* 1/120 (* (pow lambda1 2) (* (cos phi2) (sin lambda2))))))))
(* lambda1 (+ (* (cos phi2) (sin lambda2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (cos phi2) (sin lambda2)))))))))
(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))))
(+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(* -1 (+ lambda2 phi1))
(- lambda1 (+ lambda2 phi1))
(cos (- (+ phi1 (PI)) lambda2))
(+ (cos (- (+ phi1 (PI)) lambda2)) (* -1 (* lambda1 (sin (- (+ phi1 (PI)) lambda2)))))
(+ (cos (- (+ phi1 (PI)) lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (- (+ phi1 (PI)) lambda2)))) (sin (- (+ phi1 (PI)) lambda2)))))
(+ (cos (- (+ phi1 (PI)) lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (- (+ phi1 (PI)) lambda2))) (* 1/6 (* lambda1 (sin (- (+ phi1 (PI)) lambda2)))))) (sin (- (+ phi1 (PI)) lambda2)))))
(- (+ phi1 (PI)) lambda2)
(- (+ lambda1 (+ phi1 (PI))) 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)))
(* 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 phi1)))
(+ (cos (neg (+ lambda2 phi1))) (* -1 (* lambda1 (sin (neg (+ lambda2 phi1))))))
(+ (cos (neg (+ lambda2 phi1))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg (+ lambda2 phi1))))) (sin (neg (+ lambda2 phi1))))))
(+ (cos (neg (+ lambda2 phi1))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg (+ lambda2 phi1)))) (* 1/6 (* lambda1 (sin (neg (+ lambda2 phi1))))))) (sin (neg (+ lambda2 phi1))))))
(* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda2 lambda1))))
lambda1
(* lambda1 (+ 1 (* -1 (/ (+ lambda2 phi1) lambda1))))
(cos (- (+ lambda1 (+ phi1 (PI))) lambda2))
(* lambda1 (- (+ 1 (+ (/ phi1 lambda1) (/ (PI) lambda1))) (/ lambda2 lambda1)))
(+ (* (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))))
(* (sin lambda1) (sin lambda2))
(cos (- lambda1 (+ lambda2 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (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)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(* -1 (* lambda1 (- (+ (/ lambda2 lambda1) (/ phi1 lambda1)) 1)))
(cos (- (+ phi1 (PI)) (+ lambda2 (* -1 lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (- (+ phi1 (PI)) lambda2) lambda1)) 1)))
(cos (neg (+ lambda2 (+ phi1 (* -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))))
(* lambda2 (* (cos phi2) (sin lambda1)))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* (cos phi2) (sin lambda1))))
(* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (sin lambda1))))))))
(* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* 1/120 (* (cos phi2) (sin lambda1)))))))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1))))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(- lambda1 phi1)
(- (+ lambda1 (* -1 lambda2)) phi1)
(cos (+ lambda1 (+ phi1 (PI))))
(+ (cos (+ lambda1 (+ phi1 (PI)))) (* lambda2 (sin (+ lambda1 (+ phi1 (PI))))))
(+ (cos (+ lambda1 (+ phi1 (PI)))) (* lambda2 (- (* -1/2 (* lambda2 (cos (+ lambda1 (+ phi1 (PI)))))) (* -1 (sin (+ lambda1 (+ phi1 (PI))))))))
(+ (cos (+ lambda1 (+ phi1 (PI)))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (+ lambda1 (+ phi1 (PI))))) (* -1/6 (* lambda2 (sin (+ lambda1 (+ phi1 (PI)))))))) (* -1 (sin (+ lambda1 (+ phi1 (PI))))))))
(+ lambda1 (+ phi1 (PI)))
(+ lambda1 (+ phi1 (+ (PI) (* -1 lambda2))))
(* (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 (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 phi1))
(+ (cos (- lambda1 phi1)) (* lambda2 (sin (- lambda1 phi1))))
(+ (cos (- lambda1 phi1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (- lambda1 phi1)))) (* -1 (sin (- lambda1 phi1))))))
(+ (cos (- lambda1 phi1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- lambda1 phi1))) (* -1/6 (* lambda2 (sin (- lambda1 phi1)))))) (* -1 (sin (- lambda1 phi1))))))
(* (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))))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) (+ 1 (/ phi1 lambda2))))
(* lambda2 (- (+ (/ lambda1 lambda2) (+ (/ phi1 lambda2) (/ (PI) lambda2))) 1))
(* 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)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(* -1 (* lambda2 (+ 1 (* -1 (/ (- lambda1 phi1) lambda2)))))
(cos (+ lambda1 (+ phi1 (+ (PI) (* -1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (+ phi1 (PI))) lambda2)))))
(cos (- (+ lambda1 (* -1 lambda2)) phi1))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (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 phi2) (cos (- lambda2 lambda1)))
(- lambda1 lambda2)
(- (+ lambda1 (* -1 phi1)) lambda2)
(cos (- (+ lambda1 (PI)) lambda2))
(+ (cos (- (+ lambda1 (PI)) lambda2)) (* -1 (* phi1 (sin (- (+ lambda1 (PI)) lambda2)))))
(+ (cos (- (+ lambda1 (PI)) lambda2)) (* phi1 (- (* -1/2 (* phi1 (cos (- (+ lambda1 (PI)) lambda2)))) (sin (- (+ lambda1 (PI)) lambda2)))))
(+ (cos (- (+ lambda1 (PI)) lambda2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (- (+ lambda1 (PI)) lambda2))) (* 1/6 (* phi1 (sin (- (+ lambda1 (PI)) lambda2)))))) (sin (- (+ lambda1 (PI)) lambda2)))))
(- (+ lambda1 (PI)) 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 (- lambda1 lambda2))
(+ (cos (- lambda1 lambda2)) (* phi1 (sin (- lambda1 lambda2))))
(+ (cos (- lambda1 lambda2)) (* phi1 (- (* -1/2 (* phi1 (cos (- lambda1 lambda2)))) (* -1 (sin (- lambda1 lambda2))))))
(+ (cos (- lambda1 lambda2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi1 (sin (- lambda1 lambda2)))))) (* -1 (sin (- lambda1 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 phi2) (cos (- lambda2 lambda1))) phi1)))
(* -1 phi1)
(* phi1 (- (/ lambda1 phi1) (+ 1 (/ lambda2 phi1))))
phi1
(* phi1 (- (+ 1 (+ (/ lambda1 phi1) (/ (PI) phi1))) (/ lambda2 phi1)))
(* (sin phi1) (sin phi2))
(* -1 (* phi1 (+ (* -1 (sin phi2)) (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (- lambda1 lambda2) phi1)))))
(cos (- (+ lambda1 (PI)) (+ lambda2 (* -1 phi1))))
(* -1 (* phi1 (- (* -1 (/ (- (+ lambda1 (PI)) lambda2) phi1)) 1)))
(cos (- (+ lambda1 (* -1 phi1)) lambda2))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (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)))))
(+ (* -1/2 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))) (* (sin lambda1) (sin lambda2)))
(+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (sin lambda2))) (* 1/24 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))))))
(+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (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))))
(cos (- lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* phi1 phi2))
(+ (cos (- lambda2 lambda1)) (* phi2 (+ phi1 (* -1/2 (* phi2 (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* phi2 (+ phi1 (* phi2 (+ (* -1/2 (cos (- lambda2 lambda1))) (* -1/6 (* phi1 phi2)))))))
(* (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))))))))))
(* 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 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))))))))))))))
Calls

15 calls:

TimeVariablePointExpression
28.0ms
lambda1
@-inf
((+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (* (* (sin lambda1) (sin lambda2)) (cos 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)))) (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (* (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))))) (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) (* (sin phi1) (sin phi2)) (* (sin phi2) (sin phi1)) (* (sin lambda1) (sin lambda2)) (cos (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))
21.0ms
phi2
@inf
((+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (* (* (sin lambda1) (sin lambda2)) (cos 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)))) (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (* (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))))) (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) (* (sin phi1) (sin phi2)) (* (sin phi2) (sin phi1)) (* (sin lambda1) (sin lambda2)) (cos (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))
8.0ms
lambda2
@-inf
((+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (* (* (sin lambda1) (sin lambda2)) (cos 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)))) (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (* (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))))) (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) (* (sin phi1) (sin phi2)) (* (sin phi2) (sin phi1)) (* (sin lambda1) (sin lambda2)) (cos (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))
6.0ms
phi2
@-inf
((+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (* (* (sin lambda1) (sin lambda2)) (cos 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)))) (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (* (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))))) (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) (* (sin phi1) (sin phi2)) (* (sin phi2) (sin phi1)) (* (sin lambda1) (sin lambda2)) (cos (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))
6.0ms
phi1
@inf
((+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (* (* (sin lambda1) (sin lambda2)) (cos 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)))) (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (* (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))))) (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))) (* (sin phi1) (sin phi2)) (* (sin phi2) (sin phi1)) (* (sin lambda1) (sin lambda2)) (cos (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))))

simplify240.0ms (1.2%)

Memory
3.3MiB live, 183.8MiB allocated; 30ms collecting garbage
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06963823
127403629
081083352
Stop Event
iter limit
node limit
Counts
185 → 183
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 (+ (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* lambda1 (* (cos phi2) (sin lambda2)))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2))))
(* lambda1 (+ (* (cos phi2) (sin lambda2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* 1/120 (* (pow lambda1 2) (* (cos phi2) (sin lambda2))))))))
(* lambda1 (+ (* (cos phi2) (sin lambda2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (cos phi2) (sin lambda2)))))))))
(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))))
(+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(* -1 (+ lambda2 phi1))
(- lambda1 (+ lambda2 phi1))
(cos (- (+ phi1 (PI)) lambda2))
(+ (cos (- (+ phi1 (PI)) lambda2)) (* -1 (* lambda1 (sin (- (+ phi1 (PI)) lambda2)))))
(+ (cos (- (+ phi1 (PI)) lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (- (+ phi1 (PI)) lambda2)))) (sin (- (+ phi1 (PI)) lambda2)))))
(+ (cos (- (+ phi1 (PI)) lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (- (+ phi1 (PI)) lambda2))) (* 1/6 (* lambda1 (sin (- (+ phi1 (PI)) lambda2)))))) (sin (- (+ phi1 (PI)) lambda2)))))
(- (+ phi1 (PI)) lambda2)
(- (+ lambda1 (+ phi1 (PI))) 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)))
(* 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 phi1)))
(+ (cos (neg (+ lambda2 phi1))) (* -1 (* lambda1 (sin (neg (+ lambda2 phi1))))))
(+ (cos (neg (+ lambda2 phi1))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg (+ lambda2 phi1))))) (sin (neg (+ lambda2 phi1))))))
(+ (cos (neg (+ lambda2 phi1))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg (+ lambda2 phi1)))) (* 1/6 (* lambda1 (sin (neg (+ lambda2 phi1))))))) (sin (neg (+ lambda2 phi1))))))
(* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda2 lambda1))))
lambda1
(* lambda1 (+ 1 (* -1 (/ (+ lambda2 phi1) lambda1))))
(cos (- (+ lambda1 (+ phi1 (PI))) lambda2))
(* lambda1 (- (+ 1 (+ (/ phi1 lambda1) (/ (PI) lambda1))) (/ lambda2 lambda1)))
(+ (* (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))))
(* (sin lambda1) (sin lambda2))
(cos (- lambda1 (+ lambda2 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (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)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(* -1 (* lambda1 (- (+ (/ lambda2 lambda1) (/ phi1 lambda1)) 1)))
(cos (- (+ phi1 (PI)) (+ lambda2 (* -1 lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (- (+ phi1 (PI)) lambda2) lambda1)) 1)))
(cos (neg (+ lambda2 (+ phi1 (* -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))))
(* lambda2 (* (cos phi2) (sin lambda1)))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* (cos phi2) (sin lambda1))))
(* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (sin lambda1))))))))
(* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* 1/120 (* (cos phi2) (sin lambda1)))))))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1))))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(- lambda1 phi1)
(- (+ lambda1 (* -1 lambda2)) phi1)
(cos (+ lambda1 (+ phi1 (PI))))
(+ (cos (+ lambda1 (+ phi1 (PI)))) (* lambda2 (sin (+ lambda1 (+ phi1 (PI))))))
(+ (cos (+ lambda1 (+ phi1 (PI)))) (* lambda2 (- (* -1/2 (* lambda2 (cos (+ lambda1 (+ phi1 (PI)))))) (* -1 (sin (+ lambda1 (+ phi1 (PI))))))))
(+ (cos (+ lambda1 (+ phi1 (PI)))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (+ lambda1 (+ phi1 (PI))))) (* -1/6 (* lambda2 (sin (+ lambda1 (+ phi1 (PI)))))))) (* -1 (sin (+ lambda1 (+ phi1 (PI))))))))
(+ lambda1 (+ phi1 (PI)))
(+ lambda1 (+ phi1 (+ (PI) (* -1 lambda2))))
(* (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 (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 phi1))
(+ (cos (- lambda1 phi1)) (* lambda2 (sin (- lambda1 phi1))))
(+ (cos (- lambda1 phi1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (- lambda1 phi1)))) (* -1 (sin (- lambda1 phi1))))))
(+ (cos (- lambda1 phi1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- lambda1 phi1))) (* -1/6 (* lambda2 (sin (- lambda1 phi1)))))) (* -1 (sin (- lambda1 phi1))))))
(* (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))))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) (+ 1 (/ phi1 lambda2))))
(* lambda2 (- (+ (/ lambda1 lambda2) (+ (/ phi1 lambda2) (/ (PI) lambda2))) 1))
(* 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)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(* -1 (* lambda2 (+ 1 (* -1 (/ (- lambda1 phi1) lambda2)))))
(cos (+ lambda1 (+ phi1 (+ (PI) (* -1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (+ phi1 (PI))) lambda2)))))
(cos (- (+ lambda1 (* -1 lambda2)) phi1))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (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 phi2) (cos (- lambda2 lambda1)))
(- lambda1 lambda2)
(- (+ lambda1 (* -1 phi1)) lambda2)
(cos (- (+ lambda1 (PI)) lambda2))
(+ (cos (- (+ lambda1 (PI)) lambda2)) (* -1 (* phi1 (sin (- (+ lambda1 (PI)) lambda2)))))
(+ (cos (- (+ lambda1 (PI)) lambda2)) (* phi1 (- (* -1/2 (* phi1 (cos (- (+ lambda1 (PI)) lambda2)))) (sin (- (+ lambda1 (PI)) lambda2)))))
(+ (cos (- (+ lambda1 (PI)) lambda2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (- (+ lambda1 (PI)) lambda2))) (* 1/6 (* phi1 (sin (- (+ lambda1 (PI)) lambda2)))))) (sin (- (+ lambda1 (PI)) lambda2)))))
(- (+ lambda1 (PI)) 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 (- lambda1 lambda2))
(+ (cos (- lambda1 lambda2)) (* phi1 (sin (- lambda1 lambda2))))
(+ (cos (- lambda1 lambda2)) (* phi1 (- (* -1/2 (* phi1 (cos (- lambda1 lambda2)))) (* -1 (sin (- lambda1 lambda2))))))
(+ (cos (- lambda1 lambda2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi1 (sin (- lambda1 lambda2)))))) (* -1 (sin (- lambda1 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 phi2) (cos (- lambda2 lambda1))) phi1)))
(* -1 phi1)
(* phi1 (- (/ lambda1 phi1) (+ 1 (/ lambda2 phi1))))
phi1
(* phi1 (- (+ 1 (+ (/ lambda1 phi1) (/ (PI) phi1))) (/ lambda2 phi1)))
(* (sin phi1) (sin phi2))
(* -1 (* phi1 (+ (* -1 (sin phi2)) (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (- lambda1 lambda2) phi1)))))
(cos (- (+ lambda1 (PI)) (+ lambda2 (* -1 phi1))))
(* -1 (* phi1 (- (* -1 (/ (- (+ lambda1 (PI)) lambda2) phi1)) 1)))
(cos (- (+ lambda1 (* -1 phi1)) lambda2))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (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)))))
(+ (* -1/2 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))) (* (sin lambda1) (sin lambda2)))
(+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (sin lambda2))) (* 1/24 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))))))
(+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (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))))
(cos (- lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* phi1 phi2))
(+ (cos (- lambda2 lambda1)) (* phi2 (+ phi1 (* -1/2 (* phi2 (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* phi2 (+ phi1 (* phi2 (+ (* -1/2 (cos (- lambda2 lambda1))) (* -1/6 (* phi1 phi2)))))))
(* (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))))))))))
(* 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 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))))))))))))))
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 (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 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.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)
(+ (* (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 (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))))
(* lambda1 (* (cos phi2) (sin lambda2)))
(*.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1)
(* lambda1 (+ (* (cos phi2) (sin lambda2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* 1/120 (* (pow lambda1 2) (* (cos phi2) (sin lambda2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1)
(* lambda1 (+ (* (cos phi2) (sin lambda2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (cos phi2) (sin lambda2)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1))) (*.f64 lambda1 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1)
(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 (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 (neg.f64 lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (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 (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))) 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 (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (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) lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)) lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (+ (* phi1 (sin phi2)) (* (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 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(* -1 (+ lambda2 phi1))
(neg.f64 (+.f64 phi1 lambda2))
(- lambda1 (+ lambda2 phi1))
(-.f64 (-.f64 lambda1 lambda2) phi1)
(cos (- (+ phi1 (PI)) lambda2))
(cos.f64 (-.f64 (+.f64 (PI.f64) phi1) lambda2))
(+ (cos (- (+ phi1 (PI)) lambda2)) (* -1 (* lambda1 (sin (- (+ phi1 (PI)) lambda2)))))
(fma.f64 (neg.f64 lambda1) (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) lambda2)) (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) lambda2)))
(+ (cos (- (+ phi1 (PI)) lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (- (+ phi1 (PI)) lambda2)))) (sin (- (+ phi1 (PI)) lambda2)))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) lambda2))) (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) lambda2))) lambda1 (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) lambda2)))
(+ (cos (- (+ phi1 (PI)) lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (- (+ phi1 (PI)) lambda2))) (* 1/6 (* lambda1 (sin (- (+ phi1 (PI)) lambda2)))))) (sin (- (+ phi1 (PI)) lambda2)))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) lambda2)) (*.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) lambda2)) #s(literal -1/2 binary64))) lambda1) (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) lambda2))) lambda1 (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) lambda2)))
(- (+ phi1 (PI)) lambda2)
(-.f64 (+.f64 (PI.f64) phi1) lambda2)
(- (+ lambda1 (+ phi1 (PI))) lambda2)
(-.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2)
(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 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(* 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 (neg (+ lambda2 phi1)))
(cos.f64 (+.f64 phi1 lambda2))
(+ (cos (neg (+ lambda2 phi1))) (* -1 (* lambda1 (sin (neg (+ lambda2 phi1))))))
(fma.f64 (neg.f64 lambda1) (sin.f64 (neg.f64 (+.f64 phi1 lambda2))) (cos.f64 (+.f64 phi1 lambda2)))
(+ (cos (neg (+ lambda2 phi1))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg (+ lambda2 phi1))))) (sin (neg (+ lambda2 phi1))))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 (+.f64 phi1 lambda2))) (sin.f64 (neg.f64 (+.f64 phi1 lambda2)))) lambda1 (cos.f64 (+.f64 phi1 lambda2)))
(+ (cos (neg (+ lambda2 phi1))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg (+ lambda2 phi1)))) (* 1/6 (* lambda1 (sin (neg (+ lambda2 phi1))))))) (sin (neg (+ lambda2 phi1))))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (neg.f64 (+.f64 phi1 lambda2))) (*.f64 (cos.f64 (+.f64 phi1 lambda2)) #s(literal -1/2 binary64))) lambda1) (sin.f64 (neg.f64 (+.f64 phi1 lambda2)))) lambda1 (cos.f64 (+.f64 phi1 lambda2)))
(* (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 phi1)) (cos.f64 phi2) (*.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 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (*.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))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (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) (* (sin lambda1) (sin lambda2)))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* (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)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
lambda1
(* lambda1 (+ 1 (* -1 (/ (+ lambda2 phi1) lambda1))))
(fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1)
(cos (- (+ lambda1 (+ phi1 (PI))) lambda2))
(cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2))
(* lambda1 (- (+ 1 (+ (/ phi1 lambda1) (/ (PI) lambda1))) (/ lambda2 lambda1)))
(+.f64 lambda1 (*.f64 (/.f64 (-.f64 (+.f64 (PI.f64) phi1) lambda2) lambda1) lambda1))
(+ (* (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))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(cos (- lambda1 (+ lambda2 phi1)))
(cos.f64 (-.f64 (+.f64 phi1 lambda2) lambda1))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (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 (*.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)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(* -1 (* lambda1 (- (+ (/ lambda2 lambda1) (/ phi1 lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) #s(literal 1 binary64)))
(cos (- (+ phi1 (PI)) (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2))
(* -1 (* lambda1 (- (* -1 (/ (- (+ phi1 (PI)) lambda2) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (-.f64 (+.f64 (PI.f64) phi1) lambda2) (neg.f64 lambda1)) #s(literal 1 binary64)))
(cos (neg (+ lambda2 (+ phi1 (* -1 lambda1)))))
(cos.f64 (-.f64 (+.f64 phi1 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 #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))))
(* lambda2 (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* (cos phi2) (sin lambda1))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2)
(* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (sin lambda1))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2)
(* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* 1/120 (* (cos phi2) (sin lambda1)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2)
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (neg.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (neg.f64 (cos.f64 phi2)) (neg.f64 (sin.f64 lambda1)))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (neg.f64 (sin.f64 lambda1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)))) lambda2)) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(- lambda1 phi1)
(-.f64 lambda1 phi1)
(- (+ lambda1 (* -1 lambda2)) phi1)
(-.f64 (-.f64 lambda1 lambda2) phi1)
(cos (+ lambda1 (+ phi1 (PI))))
(neg.f64 (cos.f64 (+.f64 phi1 lambda1)))
(+ (cos (+ lambda1 (+ phi1 (PI)))) (* lambda2 (sin (+ lambda1 (+ phi1 (PI))))))
(fma.f64 (neg.f64 (sin.f64 (+.f64 phi1 lambda1))) lambda2 (neg.f64 (cos.f64 (+.f64 phi1 lambda1))))
(+ (cos (+ lambda1 (+ phi1 (PI)))) (* lambda2 (- (* -1/2 (* lambda2 (cos (+ lambda1 (+ phi1 (PI)))))) (* -1 (sin (+ lambda1 (+ phi1 (PI))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (neg.f64 (cos.f64 (+.f64 phi1 lambda1))) (neg.f64 (sin.f64 (+.f64 phi1 lambda1)))) lambda2 (neg.f64 (cos.f64 (+.f64 phi1 lambda1))))
(+ (cos (+ lambda1 (+ phi1 (PI)))) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (+ lambda1 (+ phi1 (PI))))) (* -1/6 (* lambda2 (sin (+ lambda1 (+ phi1 (PI)))))))) (* -1 (sin (+ lambda1 (+ phi1 (PI))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (neg.f64 (sin.f64 (+.f64 phi1 lambda1))) (*.f64 (neg.f64 (cos.f64 (+.f64 phi1 lambda1))) #s(literal -1/2 binary64))) lambda2 (neg.f64 (sin.f64 (+.f64 phi1 lambda1)))) lambda2 (neg.f64 (cos.f64 (+.f64 phi1 lambda1))))
(+ lambda1 (+ phi1 (PI)))
(+.f64 (+.f64 (PI.f64) phi1) lambda1)
(+ lambda1 (+ phi1 (+ (PI) (* -1 lambda2))))
(-.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2)
(* (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 lambda2 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.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 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(* 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 (- lambda1 phi1))
(cos.f64 (-.f64 lambda1 phi1))
(+ (cos (- lambda1 phi1)) (* lambda2 (sin (- lambda1 phi1))))
(fma.f64 (sin.f64 (-.f64 lambda1 phi1)) lambda2 (cos.f64 (-.f64 lambda1 phi1)))
(+ (cos (- lambda1 phi1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (- lambda1 phi1)))) (* -1 (sin (- lambda1 phi1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (-.f64 lambda1 phi1)) (sin.f64 (-.f64 lambda1 phi1))) lambda2 (cos.f64 (-.f64 lambda1 phi1)))
(+ (cos (- lambda1 phi1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- lambda1 phi1))) (* -1/6 (* lambda2 (sin (- lambda1 phi1)))))) (* -1 (sin (- lambda1 phi1))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (sin.f64 (-.f64 lambda1 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 phi1)) #s(literal -1/2 binary64))) lambda2 (sin.f64 (-.f64 lambda1 phi1))) lambda2 (cos.f64 (-.f64 lambda1 phi1)))
(* (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 (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 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.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))))
(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))))
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) (+ 1 (/ phi1 lambda2))))
(*.f64 (-.f64 (/.f64 (-.f64 lambda1 phi1) lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (+ (/ lambda1 lambda2) (+ (/ phi1 lambda2) (/ (PI) lambda2))) 1))
(*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)
(* 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)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(* -1 (* lambda2 (+ 1 (* -1 (/ (- lambda1 phi1) lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 phi1) lambda2)) (neg.f64 lambda2))
(cos (+ lambda1 (+ phi1 (+ (PI) (* -1 lambda2)))))
(cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (+ phi1 (PI))) lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2)) (neg.f64 lambda2))
(cos (- (+ lambda1 (* -1 lambda2)) phi1))
(cos.f64 (-.f64 (+.f64 phi1 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))
(+ (* 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 #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 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 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 phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- (+ lambda1 (* -1 phi1)) lambda2)
(-.f64 (-.f64 lambda1 lambda2) phi1)
(cos (- (+ lambda1 (PI)) lambda2))
(cos.f64 (-.f64 (+.f64 (PI.f64) lambda1) lambda2))
(+ (cos (- (+ lambda1 (PI)) lambda2)) (* -1 (* phi1 (sin (- (+ lambda1 (PI)) lambda2)))))
(fma.f64 (neg.f64 phi1) (sin.f64 (-.f64 (+.f64 (PI.f64) lambda1) lambda2)) (cos.f64 (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))
(+ (cos (- (+ lambda1 (PI)) lambda2)) (* phi1 (- (* -1/2 (* phi1 (cos (- (+ lambda1 (PI)) lambda2)))) (sin (- (+ lambda1 (PI)) lambda2)))))
(fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (cos.f64 (-.f64 (+.f64 (PI.f64) lambda1) lambda2))) (sin.f64 (-.f64 (+.f64 (PI.f64) lambda1) lambda2))) phi1 (cos.f64 (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))
(+ (cos (- (+ lambda1 (PI)) lambda2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (- (+ lambda1 (PI)) lambda2))) (* 1/6 (* phi1 (sin (- (+ lambda1 (PI)) lambda2)))))) (sin (- (+ lambda1 (PI)) lambda2)))))
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (-.f64 (+.f64 (PI.f64) lambda1) lambda2)) (*.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) lambda1) lambda2)) #s(literal -1/2 binary64))) phi1) (sin.f64 (-.f64 (+.f64 (PI.f64) lambda1) lambda2))) phi1 (cos.f64 (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))
(- (+ lambda1 (PI)) lambda2)
(-.f64 (+.f64 (PI.f64) lambda1) lambda2)
(+ (* 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)))
(* 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 (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos (- lambda1 lambda2)) (* phi1 (sin (- lambda1 lambda2))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) phi1 (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda1 lambda2)) (* phi1 (- (* -1/2 (* phi1 (cos (- lambda1 lambda2)))) (* -1 (sin (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) phi1 (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda1 lambda2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi1 (sin (- lambda1 lambda2)))))) (* -1 (sin (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) phi1 (sin.f64 (-.f64 lambda1 lambda2))) phi1 (cos.f64 (-.f64 lambda1 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))))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 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)))) (* (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 phi2) (cos (- lambda2 lambda1))) phi1)))
(*.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) phi1)
(* -1 phi1)
(neg.f64 phi1)
(* phi1 (- (/ lambda1 phi1) (+ 1 (/ lambda2 phi1))))
(*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 binary64)) phi1)
phi1
(* phi1 (- (+ 1 (+ (/ lambda1 phi1) (/ (PI) phi1))) (/ lambda2 phi1)))
(+.f64 phi1 (*.f64 (/.f64 (-.f64 (+.f64 (PI.f64) lambda1) lambda2) phi1) phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* -1 (* phi1 (+ (* -1 (sin phi2)) (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) phi1)))))
(*.f64 (neg.f64 phi1) (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 phi2) phi1) (sin.f64 phi2))))
(* -1 (* phi1 (+ 1 (* -1 (/ (- lambda1 lambda2) phi1)))))
(neg.f64 (fma.f64 (/.f64 (-.f64 lambda2 lambda1) phi1) phi1 phi1))
(cos (- (+ lambda1 (PI)) (+ lambda2 (* -1 phi1))))
(cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2))
(* -1 (* phi1 (- (* -1 (/ (- (+ lambda1 (PI)) lambda2) phi1)) 1)))
(*.f64 (neg.f64 phi1) (-.f64 (/.f64 (-.f64 (+.f64 (PI.f64) lambda1) lambda2) (neg.f64 phi1)) #s(literal 1 binary64)))
(cos (- (+ lambda1 (* -1 phi1)) lambda2))
(cos.f64 (-.f64 (+.f64 phi1 lambda2) 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))
(+ (* 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 #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 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/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) phi2) #s(literal -1/6 binary64))) phi2 (sin.f64 phi1)) phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* -1/2 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))) (* (sin lambda1) (sin lambda2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (sin lambda2))) (* 1/24 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))))))
(fma.f64 (*.f64 (*.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) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (sin lambda1) (sin lambda2))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.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 phi2 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(* (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/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) phi2) #s(literal -1/6 binary64))) phi2 (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos (- lambda2 lambda1)) (* phi1 phi2))
(fma.f64 phi1 phi2 (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda2 lambda1)) (* phi2 (+ phi1 (* -1/2 (* phi2 (cos (- lambda2 lambda1)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (-.f64 lambda1 lambda2)) phi1) phi2 (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda2 lambda1)) (* phi2 (+ phi1 (* phi2 (+ (* -1/2 (cos (- lambda2 lambda1))) (* -1/6 (* phi1 phi2)))))))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi1 phi2) #s(literal -1/6 binary64))) phi2 phi1) phi2 (cos.f64 (-.f64 lambda1 lambda2)))
(* (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/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) phi2) #s(literal -1/6 binary64))) 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 #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))) (*.f64 (*.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 phi2 phi2)))
(* phi2 (sin phi1))
(*.f64 (sin.f64 phi1) phi2)
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 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 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 #s(literal -1/2 binary64) phi2) (*.f64 (*.f64 phi2 (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 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)))) (* (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)))

rewrite372.0ms (1.8%)

Memory
-9.1MiB live, 274.7MiB allocated; 31ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
087679
0138532
1554480
25116480
09349462
Stop Event
iter limit
node limit
iter limit
Counts
25 → 319
Calls
Call 1
Inputs
(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))))
(*.f64 (acos.f64 (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))))) R)
(acos.f64 (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)))))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))
#s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))
(-.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)))
(+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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)))) 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 lambda2) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))
(*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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)))
#s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
Outputs
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(/.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 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (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 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.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)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.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 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.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)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.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 lambda1)) (cos.f64 lambda2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.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 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (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 lambda2 lambda1))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (/.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.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)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))
(-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi1)))
(+.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.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 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.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)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (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 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(*.f64 (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.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 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))))) (+.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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) 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)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) (*.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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))))))))
(-.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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))
#s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1))
(*.f64 (/.f64 (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)))) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 phi1 phi1)) (+.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (+.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 lambda1 (+.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 phi1 #s(literal 3 binary64))) (fma.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 phi1 phi1 (*.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (+.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (+.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 lambda1 (+.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)))) (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (*.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 phi1 phi1)))) (*.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (+.f64 (pow.f64 phi1 #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (*.f64 (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 phi1 phi1)))) (*.f64 (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (+.f64 (pow.f64 phi1 #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64))) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)
(-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(-.f64 lambda1 (+.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (-.f64 lambda1 lambda2) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(/.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (neg.f64 (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (neg.f64 (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 (-.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)))
(-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(cos.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (-.f64 (-.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 (-.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1)))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (/.f64 (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)))) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (-.f64 (-.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 lambda1 (-.f64 (-.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 phi1 phi1)) (-.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (-.f64 (-.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 lambda1 (-.f64 (-.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 phi1 #s(literal 3 binary64))) (fma.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (*.f64 phi1 phi1) (*.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 phi1 phi1)) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 phi1 phi1)) (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (+.f64 (pow.f64 phi1 #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1)))
(/.f64 (fma.f64 (+.f64 (pow.f64 phi1 #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (*.f64 (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (*.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 phi1 phi1)))) (*.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(/.f64 (fma.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (+.f64 (pow.f64 phi1 #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (*.f64 (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 phi1 phi1)))) (*.f64 (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(/.f64 (fma.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (+.f64 (pow.f64 phi1 #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (+.f64 phi1 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (+.f64 phi1 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 lambda1 (-.f64 (-.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (/.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 3 binary64)) (fma.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(+.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 phi1 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(+.f64 phi1 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 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 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)))))
(*.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 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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 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 (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 (-.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 (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 (-.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 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 (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 (-.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)) (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)) (-.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 lambda1 lambda2))))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (neg.f64 (-.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 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 (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 (-.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))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (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 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (-.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)))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (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 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)))) #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 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) (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) (-.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 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 (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 (-.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 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 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) (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) (-.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 lambda1 lambda2)))) (cos.f64 (-.f64 phi2 (neg.f64 (-.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 (-.f64 lambda2 lambda1) phi2)) (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))
(/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (*.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 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (-.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (*.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 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (*.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (-.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (/.f64 (pow.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(-.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(-.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (fma.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (-.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (-.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(+.f64 #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 R (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(*.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 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(/.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi1) (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi1)))
(fma.f64 (sin.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(fma.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 (+.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))))
(sin.f64 (+.f64 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1)))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(cos.f64 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi1)) (*.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (+.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
#s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))

eval200.0ms (1%)

Memory
20.8MiB live, 223.4MiB allocated; 12ms collecting garbage
Compiler

Compiled 26 678 to 3 152 computations (88.2% saved)

prune193.0ms (1%)

Memory
9.4MiB live, 203.6MiB allocated; 8ms collecting garbage
Pruning

86 alts after pruning (82 fresh and 4 done)

PrunedKeptTotal
New44535480
Fresh114758
Picked235
Done112
Total45986545
Accuracy
94.2%
Counts
545 → 86
Alt Table
Click to see full alt table
StatusAccuracyProgram
72.6%
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) R) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))))
72.6%
(/.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 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) R) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
71.2%
(*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.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)
71.8%
(*.f64 (-.f64 (/.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.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)
72.5%
(*.f64 (-.f64 (/.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64))) #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)
72.7%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
72.8%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
47.6%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
38.3%
(*.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)
42.5%
(*.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)
14.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)))) #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)
93.3%
(*.f64 (acos.f64 (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))))) R)
41.9%
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
56.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
56.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
72.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64))) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
93.3%
(*.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.3%
(*.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 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
93.3%
(*.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 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 lambda2)) (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
93.2%
(*.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 lambda1) (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 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) R)
36.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
36.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)
43.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
41.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 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))))) R)
48.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
25.7%
(*.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)
42.2%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) R)
45.8%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) R)
51.4%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
54.8%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
49.3%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
52.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (/.f64 (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 phi1)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
93.3%
(*.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
49.3%
(*.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 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))) 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 (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)))) R)
18.3%
(*.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)
18.3%
(*.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)
18.9%
(*.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)
28.5%
(*.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 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64)))) R)
49.3%
(*.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 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.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 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))) R)
49.3%
(*.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R)
52.3%
(*.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))) R)
27.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
26.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
33.6%
(*.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)
52.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1))))) R)
51.4%
(*.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)
72.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) R)
20.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
36.0%
(*.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)
19.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (-.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (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)))) R)
19.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (sin.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
19.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (sin.f64 (+.f64 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
19.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))) R)
7.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) R)
7.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) #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 (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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #s(literal 2 binary64)))) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) lambda1)))) #s(literal 2 binary64)))) R)
15.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #s(literal 2 binary64)))) R)
29.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 lambda1))))) #s(literal 2 binary64)))) R)
15.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
19.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
19.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
15.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
18.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
18.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
19.0%
(*.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)
20.1%
(*.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.6%
(*.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)
25.4%
(*.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)
26.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)
33.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 lambda1)) (cos.f64 phi1)))) R)
23.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
32.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
24.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) R)
14.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))) R)
11.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
22.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
7.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 (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))) R)
7.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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) R)
8.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)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))) R)
10.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 (- lambda2 lambda1)) (cos.f64 lambda1)))))) R)
30.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 (cos.f64 lambda2) (cos.f64 phi1))))) R)
72.8%
(*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)
Compiler

Compiled 10 329 to 3 641 computations (64.7% saved)

regimes554.0ms (2.7%)

Memory
-9.8MiB live, 481.0MiB allocated; 65ms collecting garbage
Counts
140 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (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 (cos.f64 lambda2) (*.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 lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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 lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda2) (*.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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.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 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) 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 (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 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.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 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) 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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.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 (-.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 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))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))) 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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) 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 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) 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 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) 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)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (-.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (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)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(*.f64 (-.f64 (/.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64))) #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)) #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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (-.f64 (/.f64 (*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (/.f64 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) lambda2)) lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (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)))))))) 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 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (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))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64))) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 lambda1) (sin.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 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (/.f64 (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 phi1)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) 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 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) R) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(*.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 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))))))) 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 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (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 (+.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 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 lambda2)) (cos.f64 lambda1))) (-.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (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 lambda2) (cos.f64 lambda1)) #s(literal 2 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)) (-.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)))))) 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 lambda1) (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 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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 (*.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) R) (fma.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))))) 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 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.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 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (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))))))) 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 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.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)))))))))) 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 (-.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)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))) R)
Calls

10 calls:

86.0ms
lambda1
73.0ms
phi1
60.0ms
R
54.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)
48.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
93.3%1(-.f64 lambda1 lambda2)
93.3%1(cos.f64 (-.f64 lambda1 lambda2))
93.3%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
93.3%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.3%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.3%1R
93.3%1lambda1
93.3%1lambda2
93.3%1phi1
93.3%1phi2
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes306.0ms (1.5%)

Memory
-9.8MiB live, 608.5MiB allocated; 46ms collecting garbage
Counts
116 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (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 (cos.f64 lambda2) (*.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 lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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 lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda2) (*.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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.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 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) 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 (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 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.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 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) 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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.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 (-.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 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))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))) 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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) 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 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) 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 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) 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)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (-.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (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)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(*.f64 (-.f64 (/.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64))) #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)) #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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (-.f64 (/.f64 (*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (/.f64 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) lambda2)) lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (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)))))))) 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 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (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))))) R)
Outputs
(*.f64 (acos.f64 (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))))) R)
Calls

10 calls:

33.0ms
phi1
31.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
31.0ms
(cos.f64 (-.f64 lambda1 lambda2))
30.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
29.0ms
phi2
Results
AccuracySegmentsBranch
93.3%1(cos.f64 (-.f64 lambda1 lambda2))
93.3%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
93.3%1R
93.3%1(-.f64 lambda1 lambda2)
93.3%1lambda1
93.3%1phi2
93.3%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.3%1lambda2
93.3%1phi1
93.3%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes360.0ms (1.8%)

Memory
-1.7MiB live, 611.7MiB allocated; 59ms collecting garbage
Counts
115 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (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 (cos.f64 lambda2) (*.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 lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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 lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda2) (*.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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.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 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) 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 (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 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.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 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) 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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.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 (-.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 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))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))) 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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) 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 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) 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 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) 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)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (-.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (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)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(*.f64 (-.f64 (/.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64))) #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)) #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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (-.f64 (/.f64 (*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (/.f64 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) lambda2)) lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (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)))))))) 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 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.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:

62.0ms
lambda1
47.0ms
phi2
33.0ms
R
33.0ms
phi1
32.0ms
(cos.f64 (-.f64 lambda1 lambda2))
Results
AccuracySegmentsBranch
93.3%1(cos.f64 (-.f64 lambda1 lambda2))
93.3%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
93.3%1R
93.3%1lambda1
93.3%1phi2
93.3%1(-.f64 lambda1 lambda2)
93.3%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.3%1lambda2
93.3%1phi1
93.3%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes381.0ms (1.9%)

Memory
37.7MiB live, 703.8MiB allocated; 114ms collecting garbage
Counts
109 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (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 (cos.f64 lambda2) (*.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 lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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 lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda2) (*.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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.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 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) 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 (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 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.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 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) 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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.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 (-.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 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))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))) 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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) 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 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) 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 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) 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)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (-.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (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)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(*.f64 (-.f64 (/.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64))) #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)) #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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Calls

10 calls:

56.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
48.0ms
(cos.f64 (-.f64 lambda1 lambda2))
43.0ms
lambda2
37.0ms
phi2
37.0ms
phi1
Results
AccuracySegmentsBranch
93.3%1(cos.f64 (-.f64 lambda1 lambda2))
93.3%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
93.3%1R
93.3%1(-.f64 lambda1 lambda2)
93.3%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.3%1lambda1
93.3%1phi2
93.3%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.3%1lambda2
93.3%1phi1
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes393.0ms (1.9%)

Memory
50.4MiB live, 607.1MiB allocated; 144ms collecting garbage
Counts
107 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (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 (cos.f64 lambda2) (*.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 lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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 lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda2) (*.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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.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 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) 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 (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 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.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 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) 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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.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 (-.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 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))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))) 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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) 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 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) 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 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) 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)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (-.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (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)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))) R)
(*.f64 (-.f64 (/.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64))) #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)) #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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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 (sin.f64 phi2) phi1 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))))) R)
(*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)
Calls

10 calls:

57.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)
44.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))))
40.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
39.0ms
lambda2
Results
AccuracySegmentsBranch
72.8%1(cos.f64 (-.f64 lambda1 lambda2))
72.8%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
72.8%1R
72.8%1(-.f64 lambda1 lambda2)
72.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)
74.8%2lambda1
82.7%3phi2
72.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)))))
75.1%2lambda2
83.9%3phi1
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes44.0ms (0.2%)

Memory
-16.9MiB live, 84.7MiB allocated; 17ms collecting garbage
Counts
100 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (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 (cos.f64 lambda2) (*.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 lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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 lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda2) (*.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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.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 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) 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 (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 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.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 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) 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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.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 (-.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 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))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))) 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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) 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 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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)))) 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 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (/ (- (pow (* (sin lambda2) (sin lambda1)) 2) (pow (* (cos lambda2) (cos lambda1)) 2)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) 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)))) (fma.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (*.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Outputs
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)
Calls

1 calls:

38.0ms
phi1
Results
AccuracySegmentsBranch
83.7%3phi1
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes29.0ms (0.1%)

Memory
12.8MiB live, 61.2MiB allocated; 3ms collecting garbage
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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (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 (cos.f64 lambda2) (*.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 lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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 lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda2) (*.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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.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 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) 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 (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 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.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 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) 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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.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 (-.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 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))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))) 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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) 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 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) phi2)))) R)
Outputs
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)
Calls

1 calls:

24.0ms
phi1
Results
AccuracySegmentsBranch
83.7%3phi1
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes29.0ms (0.1%)

Memory
15.6MiB live, 61.0MiB allocated; 4ms collecting garbage
Counts
91 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (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 (cos.f64 lambda2) (*.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 lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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 lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda2) (*.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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.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 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) 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 (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 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.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 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) 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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (-.f64 (/.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.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 (-.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 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))))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))) 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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
Outputs
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))) R)
(*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)
Calls

1 calls:

24.0ms
phi1
Results
AccuracySegmentsBranch
83.5%3phi1
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes29.0ms (0.1%)

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

1 calls:

23.0ms
phi1
Results
AccuracySegmentsBranch
83.5%3phi1
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes26.0ms (0.1%)

Memory
9.7MiB live, 55.9MiB allocated; 3ms collecting garbage
Counts
84 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (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 (cos.f64 lambda2) (*.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 lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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 lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda2) (*.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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.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 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) 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 (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 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.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 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) 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)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R)
(*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)
Calls

1 calls:

22.0ms
phi1
Results
AccuracySegmentsBranch
83.5%3phi1
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes24.0ms (0.1%)

Memory
3.0MiB live, 49.1MiB allocated; 3ms collecting garbage
Counts
76 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (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 (cos.f64 lambda2) (*.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 lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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 lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda2) (*.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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.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)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) R)
Calls

1 calls:

20.0ms
phi1
Results
AccuracySegmentsBranch
83.5%3phi1
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes111.0ms (0.6%)

Memory
-7.5MiB live, 86.9MiB allocated; 102ms collecting garbage
Counts
74 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (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 (cos.f64 lambda2) (*.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 lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (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 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (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 lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda2) (*.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (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))))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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

2 calls:

88.0ms
phi2
20.0ms
phi1
Results
AccuracySegmentsBranch
75.7%3phi2
76.9%3phi1
Compiler

Compiled 2 to 10 computations (-400% saved)

regimes185.0ms (0.9%)

Memory
23.6MiB live, 452.5MiB allocated; 30ms collecting garbage
Counts
65 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))) R)
Calls

10 calls:

25.0ms
lambda2
18.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
18.0ms
(cos.f64 (-.f64 lambda1 lambda2))
17.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
17.0ms
lambda1
Results
AccuracySegmentsBranch
73.8%3phi2
62.3%2(cos.f64 (-.f64 lambda1 lambda2))
57.0%2(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
57.0%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)
57.0%2R
57.0%2(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
64.1%3(-.f64 lambda1 lambda2)
72.9%3lambda1
74.0%3lambda2
66.7%3phi1
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes56.0ms (0.3%)

Memory
-1.3MiB live, 140.8MiB allocated; 8ms collecting garbage
Counts
64 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (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)
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)))) (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)
Calls

3 calls:

18.0ms
lambda1
17.0ms
phi2
17.0ms
lambda2
Results
AccuracySegmentsBranch
72.8%3lambda1
64.2%3phi2
72.8%3lambda2
Compiler

Compiled 3 to 15 computations (-400% saved)

regimes119.0ms (0.6%)

Memory
-9.4MiB live, 318.9MiB allocated; 34ms collecting garbage
Counts
63 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Outputs
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.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)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) 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)
Calls

6 calls:

25.0ms
phi2
20.0ms
(cos.f64 (-.f64 lambda1 lambda2))
19.0ms
(-.f64 lambda1 lambda2)
18.0ms
phi1
17.0ms
lambda2
Results
AccuracySegmentsBranch
55.5%3(cos.f64 (-.f64 lambda1 lambda2))
55.1%3(-.f64 lambda1 lambda2)
63.1%3phi2
62.2%3phi1
58.4%3lambda2
63.5%3lambda1
Compiler

Compiled 11 to 33 computations (-200% saved)

regimes58.0ms (0.3%)

Memory
13.3MiB live, 157.3MiB allocated; 11ms collecting garbage
Counts
62 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) 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)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.f64 (fma.f64 lambda1 lambda2 #s(literal 1 binary64)) (*.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)) (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 (+.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 (-.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)
Outputs
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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)
Calls

3 calls:

19.0ms
lambda1
18.0ms
phi2
17.0ms
phi1
Results
AccuracySegmentsBranch
57.3%2phi1
57.5%2phi2
49.3%3lambda1
Compiler

Compiled 3 to 15 computations (-400% saved)

regimes22.0ms (0.1%)

Memory
-1.0MiB live, 45.0MiB allocated; 3ms collecting garbage
Counts
54 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)))) (/.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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (neg.f64 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 lambda2))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 lambda1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) #s(approx (cos (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 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 (/.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)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (+.f64 (+.f64 (PI.f64) phi1) 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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (-.f64 (+.f64 (PI.f64) lambda1) lambda2)))) #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 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 #s(approx (- (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (fma.f64 (/.f64 (+.f64 phi1 lambda2) lambda1) (neg.f64 lambda1) lambda1))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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 #s(approx (+ (- lambda1 (- lambda2 (/ (PI) 2))) (+ (/ (PI) 2) phi1)) (*.f64 (-.f64 (/.f64 (+.f64 (+.f64 (PI.f64) phi1) lambda1) lambda2) #s(literal 1 binary64)) lambda2)))) #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 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)))) 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 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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.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))) (sin.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) lambda1) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi2))))) 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)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2))))) 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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (* (cos phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) 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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 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 #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 (- 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 phi2) (cos phi1)) (+ (* (sin lambda1) lambda2) (cos lambda1))) (* (sin phi2) (sin phi1))) (fma.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))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) 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 (-.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)
Calls

1 calls:

19.0ms
phi2
Results
AccuracySegmentsBranch
57.4%2phi2
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes6.0ms (0%)

Memory
16.0MiB live, 16.0MiB allocated; 0ms collecting garbage
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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (+ (* (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 (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))) 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)
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

1 calls:

5.0ms
phi2
Results
AccuracySegmentsBranch
57.4%2phi2
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes41.0ms (0.2%)

Memory
-34.0MiB live, 111.9MiB allocated; 8ms collecting garbage
Counts
12 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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)))) (*.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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
Calls

9 calls:

6.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))))
4.0ms
phi2
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
(cos.f64 (-.f64 lambda1 lambda2))
Results
AccuracySegmentsBranch
42.5%1(-.f64 lambda1 lambda2)
42.5%1(cos.f64 (-.f64 lambda1 lambda2))
42.5%1lambda2
42.5%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
42.5%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.5%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.5%1R
51.3%2phi1
53.5%2phi2
Compiler

Compiled 63 to 81 computations (-28.6% saved)

regimes12.0ms (0.1%)

Memory
40.5MiB live, 40.5MiB allocated; 0ms collecting garbage
Counts
11 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda2) (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 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
Calls

3 calls:

4.0ms
phi2
4.0ms
phi1
3.0ms
lambda1
Results
AccuracySegmentsBranch
43.7%3lambda1
45.2%2phi1
45.3%2phi2
Compiler

Compiled 3 to 15 computations (-400% saved)

regimes38.0ms (0.2%)

Memory
-26.4MiB live, 116.3MiB allocated; 8ms collecting garbage
Counts
9 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (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)
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)) (*.f64 (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

10 calls:

6.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
4.0ms
phi2
4.0ms
R
3.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
3.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)
Results
AccuracySegmentsBranch
42.5%3lambda1
33.5%1R
33.5%1(-.f64 lambda1 lambda2)
33.5%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)
33.5%1(cos.f64 (-.f64 lambda1 lambda2))
33.5%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
33.5%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.5%3lambda2
36.8%2phi1
33.5%1phi2
Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes9.0ms (0%)

Memory
26.4MiB live, 26.4MiB allocated; 0ms collecting garbage
Counts
8 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 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 (cos.f64 lambda2) (cos.f64 phi1))))) 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)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Calls

3 calls:

3.0ms
phi1
3.0ms
lambda2
3.0ms
lambda1
Results
AccuracySegmentsBranch
36.2%2phi1
30.5%1lambda2
36.6%3lambda1
Compiler

Compiled 3 to 15 computations (-400% saved)

regimes28.0ms (0.1%)

Memory
-10.8MiB live, 82.7MiB allocated; 4ms collecting garbage
Accuracy

Total -12.7b remaining (-25.6%)

Threshold costs -12.7b (-25.6%)

Counts
7 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (*.f64 (sin.f64 phi2) phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 phi2 phi1 (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)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #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)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Calls

10 calls:

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

Compiled 64 to 86 computations (-34.4% saved)

bsearch133.0ms (0.7%)

Memory
9.9MiB live, 342.7MiB allocated; 29ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
77.0ms
7.610435014828228e-17
2.6661181010075796e-10
48.0ms
-0.00023486751346403015
-1.825371807281226e-5
Samples
104.0ms205×1valid
8.0ms35×0valid
Compiler

Compiled 1 339 to 1 075 computations (19.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 100.0ms
ival-cos: 36.0ms (35.9% of total)
ival-sin: 22.0ms (21.9% of total)
ival-mult: 18.0ms (17.9% of total)
adjust: 12.0ms (12% of total)
ival-acos: 9.0ms (9% 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)

bsearch54.0ms (0.3%)

Memory
-27.8MiB live, 65.5MiB allocated; 14ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
2.0ms
7.610435014828228e-17
2.6661181010075796e-10
39.0ms
-0.00023486751346403015
-1.825371807281226e-5
Samples
32.0ms69×1valid
2.0ms11×0valid
Compiler

Compiled 1 324 to 1 030 computations (22.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 31.0ms
ival-cos: 9.0ms (29.3% of total)
adjust: 6.0ms (19.6% of total)
ival-sin: 6.0ms (19.6% of total)
ival-mult: 4.0ms (13% of total)
ival-acos: 3.0ms (9.8% of total)
ival-sub: 1.0ms (3.3% of total)
ival-add: 1.0ms (3.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory
7.4MiB live, 7.4MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
2.0ms
7.610435014828228e-17
2.6661181010075796e-10
1.0ms
-0.00023486751346403015
-1.825371807281226e-5
Compiler

Compiled 1 234 to 1 000 computations (19% saved)

bsearch56.0ms (0.3%)

Memory
29.8MiB live, 74.9MiB allocated; 6ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
52.0ms
7.610435014828228e-17
2.6661181010075796e-10
1.0ms
-0.00023486751346403015
-1.825371807281226e-5
Samples
45.0ms71×1valid
2.0ms0valid
Compiler

Compiled 1 219 to 985 computations (19.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 27.0ms
ival-cos: 9.0ms (32.9% of total)
ival-sin: 6.0ms (21.9% of total)
adjust: 4.0ms (14.6% of total)
ival-mult: 4.0ms (14.6% of total)
ival-acos: 3.0ms (11% of total)
ival-sub: 1.0ms (3.7% of total)
ival-add: 1.0ms (3.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory
8.4MiB live, 8.4MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
2.0ms
7.610435014828228e-17
2.6661181010075796e-10
1.0ms
-0.00023486751346403015
-1.825371807281226e-5
Compiler

Compiled 1 174 to 970 computations (17.4% saved)

bsearch9.0ms (0%)

Memory
-37.0MiB live, 6.9MiB allocated; 11ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
2.0ms
7.610435014828228e-17
2.6661181010075796e-10
7.0ms
-0.00023486751346403015
-1.825371807281226e-5
Compiler

Compiled 1 228 to 1 006 computations (18.1% saved)

bsearch3.0ms (0%)

Memory
5.3MiB live, 5.3MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
7.610435014828228e-17
2.6661181010075796e-10
1.0ms
-0.00023486751346403015
-1.825371807281226e-5
Compiler

Compiled 1 147 to 925 computations (19.4% saved)

bsearch123.0ms (0.6%)

Memory
23.7MiB live, 164.7MiB allocated; 34ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
62.0ms
2.6661181010075796e-10
7.568183772156524e-9
55.0ms
-1.6076564447632134e-6
-2.3619995372648397e-8
Samples
93.0ms195×1valid
5.0ms29×0valid
Compiler

Compiled 1 093 to 886 computations (18.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 88.0ms
ival-cos: 32.0ms (36.5% of total)
ival-sin: 17.0ms (19.4% of total)
adjust: 15.0ms (17.1% of total)
ival-mult: 11.0ms (12.5% of total)
ival-acos: 8.0ms (9.1% 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)

bsearch167.0ms (0.8%)

Memory
19.6MiB live, 160.2MiB allocated; 72ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
60.0ms
1.2813073012967274e-9
3.171962297017537e-8
100.0ms
-28611657348.25533
-206063.38742180035
Samples
115.0ms169×1valid
18.0ms87×0valid
Compiler

Compiled 1 127 to 924 computations (18% saved)

Precisions
Click to see histograms. Total time spent on operations: 122.0ms
adjust: 36.0ms (29.6% of total)
ival-cos: 32.0ms (26.3% of total)
ival-sin: 30.0ms (24.6% of total)
ival-mult: 11.0ms (9% of total)
ival-acos: 7.0ms (5.8% of total)
ival-sub: 2.0ms (1.6% of total)
ival-add: 2.0ms (1.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch622.0ms (3.1%)

Memory
-203.4MiB live, 198.3MiB allocated; 968ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
548.0ms
1.4197845308880665e-31
4.4365998368093546e-20
50.0ms
-0.004680098654359678
-0.00010902796964163323
Samples
503.0ms117×0valid
82.0ms155×1valid
Compiler

Compiled 1 144 to 943 computations (17.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 92.0ms
ival-cos: 32.0ms (34.7% of total)
ival-sin: 21.0ms (22.8% of total)
ival-mult: 17.0ms (18.4% of total)
adjust: 8.0ms (8.7% of total)
ival-acos: 8.0ms (8.7% of total)
ival-add: 3.0ms (3.3% of total)
ival-sub: 2.0ms (2.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch61.0ms (0.3%)

Memory
15.0MiB live, 158.8MiB allocated; 17ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
23.0ms
3.014455996638745e+81
3.3524053193922772e+81
34.0ms
-0.004680098654359678
-0.00010902796964163323
Samples
39.0ms74×1valid
8.0ms38×0valid
Compiler

Compiled 535 to 457 computations (14.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 41.0ms
ival-cos: 14.0ms (33.9% of total)
ival-sin: 13.0ms (31.5% of total)
ival-mult: 5.0ms (12.1% of total)
adjust: 4.0ms (9.7% of total)
ival-acos: 3.0ms (7.3% of total)
ival-sub: 1.0ms (2.4% of total)
ival-add: 1.0ms (2.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch49.0ms (0.2%)

Memory
10.9MiB live, 152.5MiB allocated; 5ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
46.0ms
3.7270351111870155e-13
2.4506042293418223e-12
Samples
38.0ms83×1valid
3.0ms13×0valid
Compiler

Compiled 442 to 361 computations (18.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 36.0ms
ival-cos: 12.0ms (33.1% of total)
ival-sin: 10.0ms (27.6% of total)
ival-mult: 5.0ms (13.8% of total)
adjust: 4.0ms (11% of total)
ival-acos: 3.0ms (8.3% of total)
ival-sub: 1.0ms (2.8% of total)
ival-add: 1.0ms (2.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
6.8MiB live, 6.8MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
3.7270351111870155e-13
2.4506042293418223e-12
Compiler

Compiled 370 to 325 computations (12.2% saved)

bsearch1.0ms (0%)

Memory
4.6MiB live, 4.6MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
3.7270351111870155e-13
2.4506042293418223e-12
Compiler

Compiled 346 to 301 computations (13% saved)

bsearch123.0ms (0.6%)

Memory
-24.8MiB live, 217.1MiB allocated; 52ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
118.0ms
5.57896704132174e-6
27550.362011294194
Samples
105.0ms130×1valid
5.0ms30×0valid
Compiler

Compiled 762 to 545 computations (28.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 100.0ms
ival-mult: 44.0ms (44.2% of total)
ival-cos: 19.0ms (19.1% of total)
ival-acos: 14.0ms (14.1% of total)
ival-sin: 13.0ms (13.1% of total)
adjust: 8.0ms (8% of total)
ival-sub: 1.0ms (1% of total)
ival-add: 1.0ms (1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
4.1MiB live, 4.1MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
3.7270351111870155e-13
2.4506042293418223e-12
Compiler

Compiled 484 to 349 computations (27.9% saved)

bsearch33.0ms (0.2%)

Memory
-3.6MiB live, 43.7MiB allocated; 5ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
30.0ms
1.177632140943521e-31
1.4197845308880665e-31
1.0ms
-0.004680098654359678
-0.00010902796964163323
Samples
21.0ms15×0valid
7.0ms17×1valid
Compiler

Compiled 589 to 484 computations (17.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 27.0ms
ival-mult: 19.0ms (71.5% of total)
ival-cos: 3.0ms (11.3% of total)
ival-sin: 2.0ms (7.5% of total)
adjust: 1.0ms (3.8% of total)
ival-acos: 1.0ms (3.8% of total)
ival-sub: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-add: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch103.0ms (0.5%)

Memory
31.0MiB live, 171.8MiB allocated; 22ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
98.0ms
-4.7437445592346905e-35
-5.005618326070537e-50
Samples
86.0ms144×1valid
3.0ms16×0valid
Compiler

Compiled 722 to 555 computations (23.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 80.0ms
ival-sin: 25.0ms (31.2% of total)
ival-cos: 23.0ms (28.7% of total)
adjust: 12.0ms (15% of total)
ival-mult: 10.0ms (12.5% of total)
ival-acos: 6.0ms (7.5% of total)
ival-sub: 2.0ms (2.5% of total)
ival-add: 2.0ms (2.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

simplify77.0ms (0.4%)

Memory
-5.8MiB live, 88.1MiB allocated; 6ms collecting garbage
Algorithm
egg-herbie
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
02571898
13661886
26481886
315041886
431391886
557841886
Stop Event
node limit
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))) R)
(*.f64 (acos.f64 (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))))) 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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(if (<=.f64 phi1 #s(literal -4242751136953197/18446744073709551616 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 5029131409596857/19342813113834066795298816 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -5902958103587057/295147905179352825856 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 5029131409596857/19342813113834066795298816 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) phi1)))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -5902958103587057/295147905179352825856 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 5029131409596857/19342813113834066795298816 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -700976274800963/36893488147419103232 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 7891867750444299/77371252455336267181195264 binary64)) (*.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 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -700976274800963/36893488147419103232 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 7891867750444299/77371252455336267181195264 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -700976274800963/36893488147419103232 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7891867750444299/77371252455336267181195264 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -700976274800963/36893488147419103232 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7891867750444299/77371252455336267181195264 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) R)))
(if (<=.f64 phi1 #s(literal -6611313076017503/4722366482869645213696 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 4533471823554859/604462909807314587353088 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 lambda2 #s(literal -210000 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 lambda2 #s(literal 146393360968959/4722366482869645213696 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) (*.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))) R)))
(if (<=.f64 lambda1 #s(literal -6640827866535439/36893488147419103232 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 lambda1 #s(literal 7310753976817037/166153499473114484112975882535043072 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)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)))
(if (<=.f64 lambda1 #s(literal -6456360425798343/9223372036854775808 binary64)) (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 lambda1 #s(literal 3050000000000000191690129522865102824367198412679283255490385725826701795386195968 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 (+.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)))
(if (<=.f64 phi2 #s(literal 5942112188569825/2475880078570760549798248448 binary64)) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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))
(if (<=.f64 phi2 #s(literal 5942112188569825/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 (-.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))
(if (<=.f64 phi2 #s(literal 5942112188569825/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 8928224131675423/36893488147419103232 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R))
(if (<=.f64 phi2 #s(literal 5942112188569825/2475880078570760549798248448 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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R))
(if (<=.f64 lambda1 #s(literal -6640827866535439/36893488147419103232 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 1598517415830675/11417981541647679048466287755595961091061972992 binary64)) (*.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 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 -1099049231272839/23384026197294446691258957323460528314494920687616 binary64)) (*.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 lambda2) (cos.f64 phi1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (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))))) R)
(*.f64 (acos.f64 (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))))) 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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(if (<=.f64 phi1 #s(literal -4242751136953197/18446744073709551616 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 5029131409596857/19342813113834066795298816 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -4242751136953197/18446744073709551616 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 5029131409596857/19342813113834066795298816 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -5902958103587057/295147905179352825856 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 5029131409596857/19342813113834066795298816 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) phi1)))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -5902958103587057/295147905179352825856 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 5029131409596857/19342813113834066795298816 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -5902958103587057/295147905179352825856 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 5029131409596857/19342813113834066795298816 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -700976274800963/36893488147419103232 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 7891867750444299/77371252455336267181195264 binary64)) (*.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 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -700976274800963/36893488147419103232 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 7891867750444299/77371252455336267181195264 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -700976274800963/36893488147419103232 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 7891867750444299/77371252455336267181195264 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -700976274800963/36893488147419103232 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (if (<=.f64 phi1 #s(literal 7891867750444299/77371252455336267181195264 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -700976274800963/36893488147419103232 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7891867750444299/77371252455336267181195264 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -700976274800963/36893488147419103232 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7891867750444299/77371252455336267181195264 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R) (*.f64 #s(approx (- (/ (PI) 2) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/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)))
(if (<=.f64 phi1 #s(literal -700976274800963/36893488147419103232 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7891867750444299/77371252455336267181195264 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) R)))
(if (or (<=.f64 phi1 #s(literal -700976274800963/36893488147419103232 binary64)) (not (<=.f64 phi1 #s(literal 7891867750444299/77371252455336267181195264 binary64)))) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))) R))
(if (<=.f64 phi1 #s(literal -6611313076017503/4722366482869645213696 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 4533471823554859/604462909807314587353088 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 phi1 #s(literal -6611313076017503/4722366482869645213696 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 4533471823554859/604462909807314587353088 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.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 lambda2 #s(literal -210000 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 lambda2 #s(literal 146393360968959/4722366482869645213696 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) (*.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))) R)))
(if (<=.f64 lambda2 #s(literal -210000 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 lambda2 #s(literal 146393360968959/4722366482869645213696 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) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))) R)))
(if (<=.f64 lambda1 #s(literal -6640827866535439/36893488147419103232 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 lambda1 #s(literal 7310753976817037/166153499473114484112975882535043072 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)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)))
(if (or (<=.f64 lambda1 #s(literal -6640827866535439/36893488147419103232 binary64)) (not (<=.f64 lambda1 #s(literal 7310753976817037/166153499473114484112975882535043072 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) (*.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 lambda1 #s(literal -6456360425798343/9223372036854775808 binary64)) (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 lambda1 #s(literal 3050000000000000191690129522865102824367198412679283255490385725826701795386195968 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 (+.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)))
(if (<=.f64 phi2 #s(literal 5942112188569825/2475880078570760549798248448 binary64)) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (+ (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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))
(if (<=.f64 phi2 #s(literal 5942112188569825/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 (-.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))
(if (<=.f64 phi2 #s(literal 5942112188569825/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 8928224131675423/36893488147419103232 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 (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R))
(if (<=.f64 phi2 #s(literal 8928224131675423/36893488147419103232 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 lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R))
(if (<=.f64 phi2 #s(literal 5942112188569825/2475880078570760549798248448 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)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R))
(if (<=.f64 phi2 #s(literal 5942112188569825/2475880078570760549798248448 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 lambda1) (cos lambda2)) (cos phi1)) (cos phi2)) (* (* (* (cos phi2) (cos phi1)) (sin lambda1)) (sin lambda2)))) #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R))
(if (<=.f64 lambda1 #s(literal -6640827866535439/36893488147419103232 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 1598517415830675/11417981541647679048466287755595961091061972992 binary64)) (*.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 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 -6640827866535439/36893488147419103232 binary64)) (not (<=.f64 lambda1 #s(literal 1598517415830675/11417981541647679048466287755595961091061972992 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)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R))
(if (<=.f64 phi1 #s(literal -1099049231272839/23384026197294446691258957323460528314494920687616 binary64)) (*.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 lambda2) (cos.f64 phi1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos 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 (+ (* (sin phi2) phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)

derivations1.8s (9.2%)

Memory
24.2MiB live, 1 664.9MiB allocated; 275ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0183819
1684801
22705754
36261754
08014691
06464232
124623958
276693810
081043529
01761
02961
19661
275461
0816358
06963823
127403629
081083352
087679
0138532
1554480
25116480
09349462
072491
0124482
1435386
24012386
08873386
068580
0117464
1420464
23316464
08251449
06324006
125113756
258493735
082983450
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 1 970 to 259 computations (86.9% saved)

preprocess186.0ms (0.9%)

Memory
7.1MiB live, 237.0MiB allocated; 31ms collecting garbage
Remove

(sort phi1 phi2)

(negabs R)

Compiler

Compiled 4 226 to 736 computations (82.6% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

Profiling

Loading profile data...